Details

Time bar (total: 2.5min)

analyze2.7s (1.8%)

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
0%0%99.8%0.2%0%0%0%10
0%0%99.8%0.2%0%0%0%11
0%0%99.8%0.2%0%0%0%12
Compiler

Compiled 71 to 47 computations (33.8% saved)

sample22.9s (15.2%)

Results
16.6s5420×body1024valid
2.6s439×body2048valid
2.4s1314×body512valid
1.2s1083×body256valid
4.0msbody1024infinite
Bogosity

preprocess92.0ms (0.1%)

Algorithm
egg-herbie
Rules
1414×rational_best-simplify-53
1286×rational_best-simplify-43
1078×rational_best-simplify-49
996×rational_best-simplify-46
910×rational_best-simplify-2
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01722255
13462255
26102167
312122167
426052167
562822035
055
Stop Event
saturated
node limit
Calls
Call 1
Inputs
0
1
2
3
4
Outputs
0
1
2
3
4
Call 2
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 lambda1 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2))) (sin.f64 (/.f64 (-.f64 R lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2))) (sin.f64 (/.f64 (-.f64 R lambda2) 2)))))))))
(*.f64 lambda2 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))) (sin.f64 (/.f64 (-.f64 lambda1 R) 2)))))))))
(*.f64 phi1 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 R) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 R) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 phi2 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda2 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda2 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 phi1))))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 phi2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 phi2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 lambda1 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2))) (sin.f64 (/.f64 (-.f64 R lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2))) (sin.f64 (/.f64 (-.f64 R lambda2) 2)))))))))
(*.f64 2 (*.f64 lambda1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 R lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 R lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2))))))))))
(*.f64 2 (*.f64 lambda1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 R lambda2) 2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 R lambda2) 2)) (sin.f64 (/.f64 (-.f64 R lambda2) 2))))))))))
(*.f64 2 (*.f64 lambda1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 R lambda2) 2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 R lambda2) 2)))) 2))))))))
(*.f64 2 (*.f64 lambda1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 R lambda2) 2))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 R lambda2) 2))) 2)))))))))
(*.f64 2 (*.f64 lambda1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 R lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 R lambda2) 1)) 2)))))))))
(*.f64 lambda2 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))) (sin.f64 (/.f64 (-.f64 lambda1 R) 2)))))))))
(*.f64 2 (*.f64 lambda2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 R) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 R) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 R) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 R) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 R) 2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 R) 2)))) 2)))))) (*.f64 2 lambda2))
(*.f64 2 (*.f64 lambda2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 R) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 R) 2))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 R) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 R) 2))) 2)))))))) (*.f64 2 lambda2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 R) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 R) 1)) 2)))))))) (*.f64 2 lambda2))
(*.f64 phi1 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 R) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 R) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 2 (*.f64 phi1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (cos.f64 R)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (cos.f64 R))))))))))
(*.f64 2 (*.f64 phi1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 R)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 R))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 R)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 R)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2)))))) (*.f64 2 phi1))
(*.f64 2 (*.f64 phi1 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 R))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 R)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 R) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 R) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2)))))))) (*.f64 2 phi1))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 R) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 R phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 R) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))))) (*.f64 2 phi1))
(*.f64 phi2 (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 2 (*.f64 phi2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi1) (cos.f64 R)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi1) (cos.f64 R))))))))))
(*.f64 2 (*.f64 phi2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 R) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 phi1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 R) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 phi1))))))))))
(*.f64 2 (*.f64 phi2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2))))))))
(*.f64 2 (*.f64 phi2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (cos.f64 R) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 phi1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (cos.f64 R) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 phi1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2))))))) (*.f64 2 phi2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 R) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 R)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 2 phi2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda2 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) -2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) -2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) -2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) -2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) -2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) -2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) -2)))) 2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) -2))) 2)) (cos.f64 phi2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) -2))) 2)) (cos.f64 phi2)))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 (/.f64 (*.f64 2 (-.f64 lambda2 lambda1)) 2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 (/.f64 (*.f64 2 (-.f64 lambda2 lambda1)) 2)) 2))))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda2 lambda1) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda2) 2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda2) 2)))) 2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda2) 2))) 2)) (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda2) 2))) 2)) (cos.f64 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda2) 2))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda2) 2))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 phi1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 phi1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2)) (sin.f64 (/.f64 (-.f64 phi2 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi2 lambda2) 2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi2 lambda2) 2)))) 2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi2 lambda2) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi2 lambda2) 2))) 2))))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi2 lambda2) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi2 lambda2) 2))) 2))))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 phi2 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 phi2 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda2 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda2 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda2 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 lambda2 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2)) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 (/.f64 (-.f64 lambda1 phi1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) -2)) (sin.f64 (/.f64 (-.f64 phi1 lambda1) -2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda1) -2)) (sin.f64 (/.f64 (-.f64 phi1 lambda1) -2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda1) -2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda1) -2)))) 2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda1) -2))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 phi1 lambda1) -2))) 2)))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 1/2 (/.f64 (cos.f64 (/.f64 (*.f64 2 (-.f64 lambda1 phi1)) 2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 1/2 (/.f64 (cos.f64 (/.f64 (*.f64 2 (-.f64 lambda1 phi1)) 2)) 2)))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 phi1) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 lambda2) -2)) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 phi1) 1)) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (*.f64 (cos.f64 phi1) (cos.f64 lambda2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (cos.f64 lambda2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 phi2) 2)) (cos.f64 lambda2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 phi2) 2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 phi2) 2)))) 2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 phi2) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 phi2) 2))) 2))))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 phi2) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 phi2) 2))) 2))))))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 phi2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 lambda2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 phi2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) 2)) 2))) (sqrt.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi2 phi1) 2)) 2)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 phi1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2))) (sqrt.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 phi1)))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2)))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2))) (sqrt.f64 (-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2)))) 2)) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 phi2))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2))) (sqrt.f64 (-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)) (cos.f64 phi2))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2)))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2))) (sqrt.f64 (-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda2 lambda1) -2))) 2))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2)))))))
(*.f64 2 (*.f64 R (atan2.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2))) (sqrt.f64 (-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))) (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) -2)) 2)))))))
Compiler

Compiled 75 to 51 computations (32% saved)

simplify46.0ms (0%)

Algorithm
egg-herbie
Rules
1720×rational_best-simplify-49
1464×rational_best-simplify-46
852×rational_best-simplify-54
818×rational_best-simplify-53
796×rational_best-simplify-1
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
029205
155205
296197
3195197
4399197
5941185
62636185
Stop Event
node limit
Counts
1 → 8
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2)))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2)))) 2)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 2 (/.f64 (-.f64 lambda1 lambda2) 2))) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))

eval9.0ms (0%)

Compiler

Compiled 507 to 316 computations (37.7% saved)

prune6.0ms (0%)

Pruning

5 alts after pruning (5 fresh and 0 done)

PrunedKeptTotal
New448
Fresh011
Picked000
Done000
Total459
Error
25.1b
Counts
9 → 4
Alt Table
Click to see full alt table
StatusErrorProgram
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
Compiler

Compiled 268 to 185 computations (31% saved)

localize313.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.6b
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))
1.5b
(-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 377 to 232 computations (38.5% saved)

series24.0ms (0%)

Counts
4 → 120
Calls

30 calls:

TimeVariablePointExpression
5.0ms
lambda2
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))
3.0ms
phi1
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))
2.0ms
lambda1
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))
2.0ms
phi1
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))
2.0ms
phi2
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))

rewrite85.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
2124×rational_best-4
2124×rational_best-2
2124×rational_best-3
2124×rational_best-1
706×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
025128
1165128
2307128
3655128
41757128
55458128
Stop Event
node limit
Counts
4 → 89
Calls
Call 1
Inputs
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
(-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 (-.f64 phi1 phi2) -1/2))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))) (+.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (/.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 0) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1/2 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))

simplify162.0ms (0.1%)

Algorithm
egg-herbie
Rules
1344×rational_best-simplify-49
1252×rational_best-simplify-1
1152×rational_best-simplify-46
1024×rational_best-simplify-2
848×rational_best-simplify-44
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
047710427
1111610261
2221110157
3456010133
Stop Event
node limit
Counts
209 → 281
Calls
Call 1
Inputs
(sin.f64 (*.f64 -1/2 phi2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (pow.f64 phi1 3))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 1/2 phi1))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2))))
(+.f64 (*.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(cos.f64 (neg.f64 lambda2))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))
(+.f64 (*.f64 1/6 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 lambda1)
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1)))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))) (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 0)
(+.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2))))
(-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 0)
(-.f64 0 (-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))))
(-.f64 0 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))))
(-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 (-.f64 phi1 phi2) -1/2))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))) (+.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1))))
(*.f64 2 (/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 0))
(*.f64 1 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(*.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) 1/2)
(/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)
(/.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2)
(/.f64 (-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) -1)
(/.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))) -1)
(/.f64 (-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)
(/.f64 (-.f64 0 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) -2)
(/.f64 (-.f64 0 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)))) -2)
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(+.f64 0 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(-.f64 0 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 0 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))
(-.f64 0 (/.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) -2))
(-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (+.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2)))))
(*.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(*.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 0) (cos.f64 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(*.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2)
(/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(/.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) 2)
(/.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)
(/.f64 (neg.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) -2)
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) 2)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))
(+.f64 1/2 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)
(+.f64 0 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(+.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1/2)
(*.f64 1 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(*.f64 -1 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(/.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(pow.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) -1)
(*.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))
Outputs
(sin.f64 (*.f64 -1/2 phi2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) -1/8))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (pow.f64 phi1 3))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/48 (pow.f64 phi1 3))) (*.f64 (pow.f64 phi1 2) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2))) (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (pow.f64 phi1 3)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2))) (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 -1/48 (pow.f64 phi1 3)) (*.f64 1/2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 phi1) (*.f64 -1/48 (pow.f64 phi1 3)))) (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (pow.f64 phi1 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) -1/8))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 1/2 phi1))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2)))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2)) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2)) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3)))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3)))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/48 (pow.f64 phi2 3)) (*.f64 -1/2 phi2))))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 phi2) (*.f64 1/48 (pow.f64 phi2 3))))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(cos.f64 (neg.f64 lambda2))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/2 (pow.f64 lambda1 2)))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)) (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))))
(+.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))
(+.f64 (*.f64 1/6 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))))
(+.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/2 (pow.f64 lambda1 2)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/6 (pow.f64 lambda1 3)))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)) (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/6 (pow.f64 lambda1 3)))))
(+.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 1/6 (pow.f64 lambda1 3)) (neg.f64 lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (neg.f64 lambda1) (*.f64 1/6 (pow.f64 lambda1 3))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 lambda1)
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1)))
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 lambda2 (sin.f64 lambda1))))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (cos.f64 lambda1) (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))))
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1))))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (cos.f64 lambda1) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 -1/6 (*.f64 (sin.f64 lambda1) (pow.f64 lambda2 3))))))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (*.f64 -1/6 (pow.f64 lambda2 3))))))
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (sin.f64 lambda1) (+.f64 lambda2 (*.f64 -1/6 (pow.f64 lambda2 3))))))
(+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (+.f64 (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (+.f64 lambda2 (*.f64 -1/6 (pow.f64 lambda2 3))))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/12 (pow.f64 lambda1 3))) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4)) (*.f64 (pow.f64 lambda1 3) (*.f64 -1/12 (sin.f64 (neg.f64 lambda2))))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4)) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 1/2 lambda1) (*.f64 (pow.f64 lambda1 3) -1/12))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 1/4 (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) 1/4)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 1/2 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) 1/4)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 1/4 (cos.f64 lambda1)))) (+.f64 1/2 (*.f64 (pow.f64 lambda2 3) (*.f64 1/12 (sin.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) 1/4))) (*.f64 (sin.f64 lambda1) (*.f64 1/12 (pow.f64 lambda2 3))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) 1/4))) (*.f64 (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 3) 1/12)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) 1/4)) (*.f64 (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 3) 1/12))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))) (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))) (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 -1 (pow.f64 phi1 3)))) (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))) (*.f64 (pow.f64 phi1 3) (*.f64 -1/6 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 phi1 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 -1 (pow.f64 phi2 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (*.f64 -1 (pow.f64 phi2 2)))) (+.f64 1 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (pow.f64 phi2 3))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (+.f64 1 (neg.f64 (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (+.f64 1 (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (*.f64 lambda1 (*.f64 (sin.f64 (neg.f64 lambda2)) (cos.f64 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)) (*.f64 -1/4 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) (*.f64 -1/4 (cos.f64 phi1)))) (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 1/12 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 3) (cos.f64 phi1)))))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (*.f64 (pow.f64 lambda1 3) (cos.f64 phi1)) (*.f64 1/12 (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)) (*.f64 -1/4 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) (*.f64 -1/4 (cos.f64 phi1))))) (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (pow.f64 lambda1 3) (*.f64 1/12 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 -1/2 (cos.f64 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (pow.f64 lambda1 3) (*.f64 1/12 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 -1/2 lambda1))))) (+.f64 1 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/4 (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (+.f64 1 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) -1/4)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))) (+.f64 1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 -1/4 (cos.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1))))) (*.f64 (pow.f64 lambda2 3) (*.f64 -1/12 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (*.f64 -1/12 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (pow.f64 lambda2 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) -1/4))))) (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 -1/12 (cos.f64 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))) (+.f64 (+.f64 1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 -1/4 (cos.f64 lambda1)))))) (*.f64 (pow.f64 lambda2 3) (*.f64 -1/12 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 0)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1))))
(-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 0)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 0 (-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 0 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))))
(-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))))
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 (-.f64 phi1 phi2) -1/2))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))) (+.f64 (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))))
(cos.f64 (+.f64 (*.f64 -1/2 phi1) (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 -1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64))) (-.f64 phi2 phi1)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1)))
(*.f64 2 (/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 0))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 1 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) 1/2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) 2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2)
(*.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 1/2)
(/.f64 (-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) -1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 phi1 1/2)))) -1)
(neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))))
(/.f64 (-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2))
(/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) 2)
(/.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))))) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) 2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (/.f64 (+.f64 phi2 (-.f64 phi1 (PI.f64))) 2)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (+.f64 phi2 (-.f64 phi1 (PI.f64))) 2)))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 (-.f64 (PI.f64) phi2) phi1) -2))) (cos.f64 (/.f64 (-.f64 (-.f64 (PI.f64) phi2) phi1) -2)))) 2)
(/.f64 (-.f64 0 (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) -2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (*.f64 2 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)))) -2)
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2))
(/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2)
(/.f64 (-.f64 0 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2)
(*.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 1/2)
(/.f64 (-.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) 2)
(/.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)) (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2))) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (/.f64 (-.f64 phi2 (-.f64 (PI.f64) phi1)) 2)))) -2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (/.f64 (+.f64 phi2 (-.f64 phi1 (PI.f64))) 2)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (+.f64 phi2 (-.f64 phi1 (PI.f64))) 2)))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 (-.f64 (PI.f64) phi2) phi1) -2))) (cos.f64 (/.f64 (-.f64 (-.f64 (PI.f64) phi2) phi1) -2)))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 0 (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 0 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 0 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 0 (/.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) -2))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (+.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2)))))
(cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 2 (neg.f64 lambda2))))
(cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda2 -2)))
(cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2))))
(*.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 0) (cos.f64 0)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2)
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) 2)
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) -2)
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) 2)
(cos.f64 (-.f64 lambda1 lambda2))
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(cos.f64 (-.f64 lambda1 lambda2))
(neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))
(+.f64 1/2 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 0 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1/2)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 1 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 -1 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(pow.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 -1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 0)
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(+.f64 1 (neg.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 -1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 -1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 -1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 -1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))))) 1)
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(+.f64 1 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 -1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))

localize718.0ms (0.5%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.4b
(*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.6b
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 396 to 208 computations (47.5% saved)

series15.0ms (0%)

Counts
3 → 96
Calls

24 calls:

TimeVariablePointExpression
2.0ms
lambda1
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
1.0ms
phi1
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
1.0ms
phi2
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
1.0ms
lambda2
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
1.0ms
lambda2
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))

rewrite68.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1540×rational_best-4
1540×rational_best-2
1540×rational_best-3
1540×rational_best-1
1540×exponential-1
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
023141
1173141
2464117
31227117
43833117
Stop Event
node limit
Counts
3 → 61
Calls
Call 1
Inputs
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
(*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2))) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 (-.f64 lambda2 lambda1) 1/2))) (*.f64 (sin.f64 (*.f64 (PI.f64) 1/2)) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) 1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2)))) (+.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (*.f64 (cos.f64 0) 1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 0) 1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (cos.f64 0) (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 0) 1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (/.f64 (cos.f64 0) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 (cos.f64 0) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (/.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 2 (cos.f64 0)) 2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) 1/2) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 (cos.f64 0) 1/2)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)) 2) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (/.f64 (*.f64 2 (cos.f64 0)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 -1/2 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (/.f64 (cos.f64 0) -2) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2))))))))

simplify220.0ms (0.1%)

Algorithm
egg-herbie
Rules
1042×rational_best-simplify-1
922×rational_best-simplify-50
862×rational_best-simplify-2
858×rational_best-simplify-49
718×rational_best-simplify-46
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
038910317
18389951
215269839
325819645
438449567
569419563
Stop Event
node limit
Counts
157 → 276
Calls
Call 1
Inputs
(sin.f64 (*.f64 -1/2 lambda2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2)))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 3))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 1/2 lambda1))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1))))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1)))))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) 1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (pow.f64 lambda1 3)))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 lambda2 3)))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 0)
(+.f64 0 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(-.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 0)
(-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2))) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 (-.f64 lambda2 lambda1) 1/2))) (*.f64 (sin.f64 (*.f64 (PI.f64) 1/2)) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) 1/2))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2)))) (+.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)
(*.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 0))
(*.f64 1 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(/.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)
(/.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)
(cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1) -1)
(*.f64 -1 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(/.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)
(+.f64 0 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(+.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (*.f64 (cos.f64 0) 1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4))
(+.f64 (-.f64 (*.f64 (cos.f64 0) 1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4))
(-.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)
(-.f64 0 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))
(-.f64 (cos.f64 0) (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(-.f64 (*.f64 (cos.f64 0) 1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) -1/2)
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (/.f64 (cos.f64 0) -2))
(-.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) 1/2))
(-.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 (cos.f64 0) 1/2)))
(-.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (/.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)) 2))
(-.f64 (/.f64 (*.f64 2 (cos.f64 0)) 2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(/.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2)
(/.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2) -1)
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -2)
(pow.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(neg.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))
(fabs.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(fabs.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))
(fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) 1/2) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))
(fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 (cos.f64 0) 1/2)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))
(fabs.f64 (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)) 2) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))
(fabs.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (/.f64 (*.f64 2 (cos.f64 0)) 2)))
(fabs.f64 (-.f64 -1/2 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)))
(fabs.f64 (-.f64 (/.f64 (cos.f64 0) -2) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)))
(fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 0)))
(fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2))))
Outputs
(sin.f64 (*.f64 -1/2 lambda2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2)))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2)))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 3))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/48 (pow.f64 lambda1 3))))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/48 (pow.f64 lambda1 3)))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/2 lambda1) (*.f64 -1/48 (pow.f64 lambda1 3))))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1))))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 1/2 lambda1))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 -1/2 lambda2)))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (*.f64 -1/2 lambda2) (cos.f64 (*.f64 1/2 lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1))))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (pow.f64 lambda2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 lambda1))))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 -1/2 lambda2))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2)))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (*.f64 -1/2 lambda2) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1)))))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (pow.f64 lambda2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 lambda1))))) (+.f64 (*.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (pow.f64 lambda2 3))) (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 -1/2 lambda2)) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 1/48 (pow.f64 lambda2 3))))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 1/48 (pow.f64 lambda2 3))))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 1/48 (pow.f64 lambda2 3)) (*.f64 -1/2 lambda2)))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 -1/2 lambda2) (*.f64 1/48 (pow.f64 lambda2 3))))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4))))) (+.f64 1 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))) (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))) (+.f64 1 (*.f64 -1 (*.f64 phi1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) 1/6)) (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 -1 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 -1 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 -1 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 -1 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (neg.f64 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (neg.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1))))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (*.f64 (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) lambda1)) (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) lambda1)) (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) lambda1))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1))))) (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/24 (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 -1 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 lambda1 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 3) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6) (cos.f64 phi1)))) (*.f64 (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (pow.f64 lambda1 3) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) 1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (pow.f64 lambda1 3) (cos.f64 phi1)) -1/6)))) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 lambda1 (*.f64 (pow.f64 lambda1 3) -1/6)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) 1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))) (neg.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (*.f64 (pow.f64 lambda2 2) (*.f64 -1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (neg.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/8 (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/24 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 -1 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (pow.f64 lambda2 2) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (*.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (pow.f64 lambda2 3) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) 1/6))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (neg.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) lambda1)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) lambda1)) (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (pow.f64 lambda1 3)))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (pow.f64 lambda1 3) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/24 (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (cos.f64 (*.f64 -1/2 lambda2))))))) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (pow.f64 lambda1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6)) (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (*.f64 (pow.f64 lambda1 3) -1/6)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 lambda1 (*.f64 (pow.f64 lambda1 3) -1/6)))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 lambda2 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (neg.f64 (cos.f64 (*.f64 1/2 lambda1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (neg.f64 lambda2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 lambda2 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (neg.f64 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (neg.f64 lambda2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 lambda2 3)))))
(+.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (pow.f64 lambda2 3) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/8 (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/24 (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 lambda2 (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (+.f64 (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (+.f64 (neg.f64 lambda2) (*.f64 (pow.f64 lambda2 3) 1/6)))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 0)
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(+.f64 0 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(-.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 0)
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(-.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2))) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 (-.f64 lambda2 lambda1) 1/2))) (*.f64 (sin.f64 (*.f64 (PI.f64) 1/2)) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) 1/2))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (*.f64 1/2 (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (sin.f64 (*.f64 1/2 (-.f64 lambda2 lambda1)))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2)))) (+.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 lambda1 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda2 1/2)) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 0))
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(*.f64 1 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)))
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(/.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(/.f64 (*.f64 2 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2))) 2)
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) 1)
(sin.f64 (*.f64 -1/2 (-.f64 lambda2 lambda1)))
(cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(*.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(*.f64 -1 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(/.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) -1))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 0 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 1/2 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) 1/4)
(+.f64 1/4 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (*.f64 (cos.f64 0) 1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 -1/4 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 1/2 (cos.f64 0)))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 -1/4 (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -4) 1/4) (*.f64 (cos.f64 0) -1/2)))
(+.f64 (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 1/2 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) 1/4)
(+.f64 1/4 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (-.f64 (*.f64 (cos.f64 0) 1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 -1/4 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 1/2 (cos.f64 0)))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 -1/4 (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -4) 1/4) (*.f64 (cos.f64 0) -1/2)))
(-.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 0)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(-.f64 0 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(-.f64 (cos.f64 0) (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(-.f64 (*.f64 (cos.f64 0) 1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(-.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 1/2 (-.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) -1/2)
(/.f64 (+.f64 -1 (cos.f64 (-.f64 lambda1 lambda2))) -2)
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (/.f64 (cos.f64 0) -2))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0)) -2)
(-.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) 1/2))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 1/2 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 1/2 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) 1/4)
(+.f64 1/4 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(-.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 (cos.f64 0) 1/2)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 -1/4 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 1/2 (cos.f64 0)))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 -1/4 (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -4) 1/4) (*.f64 (cos.f64 0) -1/2)))
(-.f64 (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4) (/.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)) 2))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 1/2 (cos.f64 0)) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4)))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 -1/4 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 1/2 (cos.f64 0)))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 -1/4 (-.f64 (*.f64 1/2 (cos.f64 0)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))))
(+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -4) 1/4) (*.f64 (cos.f64 0) -1/2)))
(-.f64 (/.f64 (*.f64 2 (cos.f64 0)) 2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(/.f64 (-.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 0))) -2)
(+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(/.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2)
(-.f64 1/2 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(/.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -2)
(-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) -1/2)
(/.f64 (+.f64 -1 (cos.f64 (-.f64 lambda1 lambda2))) -2)
(pow.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(neg.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(fabs.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(fabs.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))
(fabs.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(fabs.f64 (+.f64 -1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(fabs.f64 (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) -1/2))
(fabs.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))
(fabs.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(fabs.f64 (+.f64 -1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) 1/2) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))
(fabs.f64 (+.f64 1/2 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4))))
(fabs.f64 (+.f64 1/2 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4))))
(fabs.f64 (+.f64 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) 1/4))
(fabs.f64 (+.f64 1/4 (-.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))))
(fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 (cos.f64 0) 1/2)) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))
(fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 1/2 (cos.f64 0))) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (-.f64 (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4) (*.f64 1/2 (cos.f64 0))) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 -1/4 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 1/2 (cos.f64 0))))))
(fabs.f64 (-.f64 (-.f64 (*.f64 (cos.f64 0) -1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) -4)) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (-.f64 (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 1/2 (cos.f64 0))))
(fabs.f64 (-.f64 (/.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)) 2) (*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1/4)))
(fabs.f64 (-.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 4) (*.f64 1/2 (cos.f64 0))) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (-.f64 (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4) (*.f64 1/2 (cos.f64 0))) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (+.f64 (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 -1/4 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 1/2 (cos.f64 0))))))
(fabs.f64 (-.f64 (-.f64 (*.f64 (cos.f64 0) -1/2) (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) -4)) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (-.f64 (-.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) -1/4) (*.f64 1/4 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))) (*.f64 1/2 (cos.f64 0))))
(fabs.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (/.f64 (*.f64 2 (cos.f64 0)) 2)))
(fabs.f64 (/.f64 (-.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 0))) -2))
(/.f64 (fabs.f64 (-.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 2 (cos.f64 0)))) 2)
(fabs.f64 (-.f64 (/.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2) (cos.f64 0)))
(fabs.f64 (+.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (-.f64 1/2 (cos.f64 0))))
(fabs.f64 (-.f64 -1/2 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)))
(fabs.f64 (-.f64 (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) -1/2))
(fabs.f64 (/.f64 (+.f64 -1 (cos.f64 (-.f64 lambda1 lambda2))) -2))
(/.f64 (fabs.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(fabs.f64 (-.f64 (/.f64 (cos.f64 0) -2) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)))
(fabs.f64 (/.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0)) -2))
(/.f64 (fabs.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))) 2)
(fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 0)))
(fabs.f64 (-.f64 (cos.f64 0) (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2))))))
(fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2))))
(fabs.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2))))))

localize170.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.4b
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2)
0.6b
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 395 to 205 computations (48.1% saved)

series6.0ms (0%)

Counts
2 → 72
Calls

18 calls:

TimeVariablePointExpression
1.0ms
phi1
@-inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
1.0ms
lambda2
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
1.0ms
lambda2
@-inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
1.0ms
lambda1
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
0.0ms
lambda2
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))

rewrite87.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1166×rational_best-4
1166×rational_best-2
1166×rational_best-3
1166×rational_best-1
1166×exponential-1
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
023116
1161116
2360112
3913100
42848100
57938100
Stop Event
node limit
Counts
2 → 18
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2)
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 0)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 1)))))

simplify297.0ms (0.2%)

Algorithm
egg-herbie
Rules
1472×rational_best-simplify-49
1236×rational_best-simplify-1
1164×rational_best-simplify-46
934×rational_best-simplify-53
784×rational_best-simplify-52
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
02547848
15677520
210547468
318027330
423097246
530487240
645497240
Stop Event
node limit
Counts
90 → 168
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) 1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(*.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 0)
(+.f64 0 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))
(-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 0)
(*.f64 1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 1)
(/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 1)
Outputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (neg.f64 (cos.f64 (*.f64 -1/2 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))) (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 -1 (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))) (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) 1/6)) (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2)))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (neg.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi1) (neg.f64 (cos.f64 phi2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 (*.f64 -1/2 lambda2))) (neg.f64 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 1 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) lambda1)))) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 -1/2 lambda2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 -1/2 lambda2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 (*.f64 -1/2 lambda2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 (*.f64 -1/2 lambda2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) lambda1))))) (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6) (*.f64 (cos.f64 phi2) (pow.f64 lambda1 3)))) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 -1/2 lambda2)))))))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) 1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (neg.f64 (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) 1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 lambda1)))) (*.f64 (cos.f64 phi2) lambda2))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))))) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 -1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))))) (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 lambda2 3))) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 phi1)))))) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) 1/6)) (pow.f64 lambda2 3))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 -1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) 1/6)) (pow.f64 lambda2 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 (cos.f64 phi1) (neg.f64 (pow.f64 lambda2 2)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (neg.f64 (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))
(+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))
(+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))
(+.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3)) (+.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2))))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 phi2 3) 1/6)) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 phi2 3) 1/6)) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))
(+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/6)) (pow.f64 phi2 3)))))
(+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) 1/6)) (pow.f64 phi2 3)) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1)))))) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2)))) 2)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 0)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(+.f64 0 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(-.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 0)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(*.f64 1 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(*.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 1)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)
(/.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) 1)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)

localize184.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.6b
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))
1.5b
(-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 315 to 181 computations (42.5% saved)

series3.0ms (0%)

Counts
1 → 48
Calls

12 calls:

TimeVariablePointExpression
0.0ms
phi1
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))
0.0ms
phi2
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))
0.0ms
phi2
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))
0.0ms
lambda2
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))
0.0ms
lambda1
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))

rewrite134.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1422×rational_best-simplify-2
1192×rational_best-simplify-50
850×rational_best-4
850×rational_best-2
850×rational_best-3
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02577
116877
233677
374177
4203077
5676177
Stop Event
node limit
Counts
1 → 12
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)))))))

simplify160.0ms (0.1%)

Algorithm
egg-herbie
Rules
1134×rational_best-simplify-48
1052×rational_best-simplify-49
1018×rational_best-simplify-2
904×rational_best-simplify-46
844×rational_best-simplify-1
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
02166002
14845882
28765848
314865770
421495684
533595664
668675664
Stop Event
node limit
Counts
60 → 101
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))) (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)) -1)
(*.f64 -1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)))
Outputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (+.f64 (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))) (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 -1 (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2)))))))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) 1/6)) (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))))) (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) 1/6))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 3) -1/6) phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi2 phi1))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi2 phi1))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi2 phi1))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (*.f64 -1 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi2 phi1))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))) (+.f64 1 (*.f64 -1 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))) (+.f64 1 (neg.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (+.f64 1 (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (pow.f64 phi2 3) -1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 lambda1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/2 (*.f64 lambda1 (cos.f64 phi2)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) lambda1)))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi2))))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))) (*.f64 -1/2 (*.f64 lambda1 (*.f64 (cos.f64 phi1) (sin.f64 (neg.f64 lambda2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/2 (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/4 (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/4 (pow.f64 lambda1 2))) (*.f64 -1/2 (*.f64 lambda1 (sin.f64 (neg.f64 lambda2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) lambda1)))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/12 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 1/12 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3)))))) (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/12 (pow.f64 lambda1 3)))) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda1 (cos.f64 phi2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 1/12 (pow.f64 lambda1 3))) (*.f64 -1/2 (*.f64 lambda1 (cos.f64 phi2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/4 (pow.f64 lambda1 2)))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/2 lambda1) (*.f64 1/12 (pow.f64 lambda1 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/4 (pow.f64 lambda1 2)))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 1/12 (pow.f64 lambda1 3)) (*.f64 -1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 lambda2 (*.f64 lambda1 -1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 lambda2 (*.f64 lambda1 -1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 lambda2 (*.f64 lambda1 -1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (*.f64 -1 (+.f64 lambda2 (*.f64 lambda1 -1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))) (+.f64 1 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))) (*.f64 1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda2 (sin.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 1/2 (*.f64 lambda2 (sin.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 1/2 (*.f64 lambda2 (sin.f64 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 -1/12 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (pow.f64 lambda2 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (+.f64 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) (cos.f64 phi1)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 lambda1))) (*.f64 -1/12 (pow.f64 lambda2 3))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (sin.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 -1/12 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (pow.f64 lambda2 3)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))) (+.f64 (*.f64 -1/12 (pow.f64 lambda2 3)) (*.f64 1/2 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 lambda1)) (*.f64 -1/4 (pow.f64 lambda2 2))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (+.f64 (*.f64 1/2 lambda2) (*.f64 -1/12 (pow.f64 lambda2 3))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 lambda1)) (+.f64 (*.f64 1/2 lambda2) (*.f64 -1/12 (pow.f64 lambda2 3))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 0)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)) -1)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(*.f64 -1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)) -1)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) 1)
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1)))
(-.f64 1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))

eval3.8s (2.5%)

Compiler

Compiled 173348 to 106699 computations (38.4% saved)

prune2.6s (1.7%)

Pruning

76 alts after pruning (76 fresh and 0 done)

PrunedKeptTotal
New2194762270
Fresh000
Picked101
Done303
Total2198762274
Error
22.6b
Counts
2274 → 76
Alt Table
Click to see full alt table
StatusErrorProgram
26.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
36.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
39.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
39.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
38.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
43.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
40.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
36.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
37.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
38.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
35.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
44.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
34.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
31.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
42.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
31.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
44.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
32.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
39.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
36.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
40.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
32.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
25.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
32.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Compiler

Compiled 11108 to 8022 computations (27.8% saved)

localize241.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.4b
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2)
0.5b
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 583 to 355 computations (39.1% saved)

series18.0ms (0%)

Counts
1 → 48
Calls

12 calls:

TimeVariablePointExpression
5.0ms
phi1
@-inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
3.0ms
phi2
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
2.0ms
lambda1
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
2.0ms
phi1
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
2.0ms
lambda2
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))

rewrite59.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1242×rational_best-simplify-49
1214×rational_best-1
1214×rational_best-simplify-46
1210×rational_best-4
1210×rational_best-2
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
031135
1214135
2444131
31088119
42946119
Stop Event
node limit
Counts
1 → 12
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))

simplify189.0ms (0.1%)

Algorithm
egg-herbie
Rules
1696×rational_best-simplify-49
1350×rational_best-simplify-46
1230×rational_best-simplify-2
1184×rational_best-simplify-1
862×rational_best-simplify-47
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
02268600
15018386
29588334
316418260
423868136
533568108
652218108
Stop Event
node limit
Counts
60 → 122
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) 1) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1)) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) 1) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(*.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
Outputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (neg.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 -1 (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) 1/6)) (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi1 3) -1/6) phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (neg.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 1 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(-.f64 (+.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3)) (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6)))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (pow.f64 phi2 3) -1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (cos.f64 phi1))) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (neg.f64 (pow.f64 phi2 2))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (pow.f64 phi2 3) -1/6))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) 1) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 lambda2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (neg.f64 (*.f64 lambda1 (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 -1/2 lambda2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (neg.f64 lambda1))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (neg.f64 (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1)) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (cos.f64 phi1))))) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 -1/2 lambda2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 (*.f64 -1/2 lambda2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 (*.f64 -1/2 lambda2)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 (*.f64 -1/2 lambda2))))) (neg.f64 (cos.f64 phi1))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) 1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))
(-.f64 (+.f64 (+.f64 1 (neg.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)))))) (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (cos.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 -1/2 lambda2)))))))) (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) 1/6))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (neg.f64 (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 (+.f64 1 (*.f64 (neg.f64 (cos.f64 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) 1) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (cos.f64 phi2) lambda2))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (sin.f64 (*.f64 1/2 lambda1)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (cos.f64 phi2) lambda2)))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 -1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (neg.f64 (cos.f64 phi2))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (neg.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6) (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (cos.f64 phi2) lambda2)))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 lambda2 2) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (sin.f64 (*.f64 1/2 lambda1))))) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) 1/6)) (pow.f64 lambda2 3)) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (neg.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (neg.f64 (cos.f64 phi1)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (+.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)) -1/6)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (neg.f64 (cos.f64 phi1)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (+.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3)) -1/6)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 0)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(*.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))
(neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))

localize159.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
1.5b
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
2.7b
(cos.f64 (-.f64 lambda1 lambda2))
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 403 to 246 computations (39% saved)

series2.0ms (0%)

Counts
2 → 32
Calls

12 calls:

TimeVariablePointExpression
0.0ms
lambda1
@-inf
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
0.0ms
lambda1
@0
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
0.0ms
lambda1
@0
(cos.f64 (-.f64 lambda1 lambda2))
0.0ms
lambda2
@0
(cos.f64 (-.f64 lambda1 lambda2))
0.0ms
lambda2
@0
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))

rewrite86.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1404×rational_best-2
1404×rational_best-1
1402×rational_best-4
1402×rational_best-3
1402×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01034
16334
210734
319534
441634
5107834
6349334
Stop Event
node limit
Counts
2 → 166
Calls
Call 1
Inputs
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3) -1))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3) -1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 (neg.f64 lambda2)) 2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (+.f64 lambda1 (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda2)) (sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) -2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 0 (cos.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (*.f64 (cos.f64 0) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 (-.f64 (/.f64 (PI.f64) -2) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 (*.f64 1/2 (PI.f64)))) (sin.f64 (-.f64 (/.f64 (PI.f64) -2) lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (+.f64 lambda1 lambda1))) (*.f64 (sin.f64 (+.f64 lambda1 lambda1)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 2 (*.f64 1/2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) -1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) -1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (cos.f64 0) -1) -1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 1/2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (neg.f64 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (neg.f64 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (neg.f64 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (cos.f64 0) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (cos.f64 0) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (cos.f64 0) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (+.f64 1 (cos.f64 0)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 1 (+.f64 1 (cos.f64 0)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 1 (+.f64 1 (cos.f64 0)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (*.f64 (cos.f64 0) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 1 (*.f64 (cos.f64 0) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 1 (*.f64 (cos.f64 0) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (*.f64 (cos.f64 0) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (*.f64 (cos.f64 0) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (*.f64 (cos.f64 0) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (+.f64 1 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (*.f64 (cos.f64 0) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 1/2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 (cos.f64 0) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 1 (/.f64 (cos.f64 0) -2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 (cos.f64 0) (/.f64 (cos.f64 0) -2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 2 (cos.f64 0)) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1 (cos.f64 0)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 0) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1/2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 2 (*.f64 1/2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (cos.f64 0)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (/.f64 (cos.f64 0) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (/.f64 (cos.f64 0) -2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 2 (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (+.f64 1 (cos.f64 0)) -1) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (*.f64 (cos.f64 0) 2) -1) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (/.f64 (*.f64 (cos.f64 0) -1) -1) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (/.f64 (cos.f64 0) -4) (+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2)))) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))) (cos.f64 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2)))) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))))))

simplify155.0ms (0.1%)

Algorithm
egg-herbie
Rules
1190×rational_best-simplify-2
914×rational_best-simplify-48
838×rational_best-simplify-1
764×rational_best-simplify-45
752×rational_best-simplify-49
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
04837430
110907186
227666218
366956184
Stop Event
node limit
Counts
198 → 282
Calls
Call 1
Inputs
(cos.f64 (neg.f64 lambda2))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))
(+.f64 (*.f64 1/6 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 lambda1)
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1)))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1))))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(+.f64 0 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3) -1))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2)))))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))
(+.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))))
(+.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3) -1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -2)))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda1))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda2))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(-.f64 0 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(-.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 (neg.f64 lambda2)) 2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (+.f64 lambda1 (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda2)) (sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) -2)))))
(-.f64 (*.f64 0 (cos.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (*.f64 (cos.f64 0) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))))
(-.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 (-.f64 (/.f64 (PI.f64) -2) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 (*.f64 1/2 (PI.f64)))) (sin.f64 (-.f64 (/.f64 (PI.f64) -2) lambda2))))
(-.f64 (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (+.f64 lambda1 lambda1))) (*.f64 (sin.f64 (+.f64 lambda1 lambda1)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 2 (*.f64 1/2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) -1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) -1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (cos.f64 0) -1) -1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 1/2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (cos.f64 0) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (cos.f64 0) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (cos.f64 0) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 1 (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 1 (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 1 (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 1 (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (*.f64 (cos.f64 0) -1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (*.f64 (cos.f64 0) -1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (*.f64 (cos.f64 0) -1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))
(*.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 2)
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (+.f64 1 (cos.f64 0)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (*.f64 (cos.f64 0) 2))
(*.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 -1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 0) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(*.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) 1/2)
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 1/2 (cos.f64 0)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 (cos.f64 0) -1/2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 1 (/.f64 (cos.f64 0) -2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 (cos.f64 0) (/.f64 (cos.f64 0) -2)))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)
(*.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) -1/2)
(*.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(*.f64 (-.f64 2 (cos.f64 0)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(*.f64 (*.f64 (cos.f64 0) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(*.f64 -1/2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(*.f64 (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 2 (*.f64 1/2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (neg.f64 (cos.f64 0)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))
(*.f64 (/.f64 (cos.f64 0) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))
(*.f64 (/.f64 (cos.f64 0) -2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(*.f64 (-.f64 2 (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (+.f64 1 (cos.f64 0)) -1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (*.f64 (cos.f64 0) 2) -1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (*.f64 (cos.f64 0) -1) -1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 (cos.f64 0) -4) (+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2)))
(/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) 2)
(/.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)
(/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))))) -2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2)))) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2)))) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 0)
(+.f64 0 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2) 1/2)
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)
(*.f64 1 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))
(*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(*.f64 -1 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(/.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(pow.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)
(neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
Outputs
(cos.f64 (neg.f64 lambda2))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))
(+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/2 (pow.f64 lambda1 2)))))
(+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)) (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/6 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (+.f64 (cos.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))))
(+.f64 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/2 (pow.f64 lambda1 2)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/6 (pow.f64 lambda1 3)))))
(+.f64 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1)) (*.f64 -1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))) (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/6 (pow.f64 lambda1 3)))))
(+.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 -1/2 (pow.f64 lambda1 2)))) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 1/6 (pow.f64 lambda1 3)) (neg.f64 lambda1))))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 lambda1)
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))
(+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1)))
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 -1/2 (cos.f64 lambda1))) (*.f64 lambda2 (sin.f64 lambda1))))
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (*.f64 -1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (cos.f64 lambda1))))
(+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (+.f64 (+.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) (*.f64 -1/2 (cos.f64 lambda1)))) (*.f64 -1/6 (*.f64 (sin.f64 lambda1) (pow.f64 lambda2 3)))))
(+.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 -1/6 (*.f64 (sin.f64 lambda1) (pow.f64 lambda2 3)))) (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1))))
(+.f64 (cos.f64 lambda1) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (sin.f64 lambda1) (+.f64 lambda2 (*.f64 -1/6 (pow.f64 lambda2 3))))))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/2 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 1/2))) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))))) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 1/2)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4)))) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/12 (pow.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) 1/2)) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4)) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 1/2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 3) -1/12))))) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) 1/4)) (+.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (pow.f64 lambda1 3) -1/12) (*.f64 lambda1 1/2))))) (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1)))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 1/4 (cos.f64 lambda1))))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (*.f64 1/4 (pow.f64 lambda2 2))))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (+.f64 1/2 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) 1/4)))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 (pow.f64 lambda2 2) (*.f64 1/4 (cos.f64 lambda1)))) (+.f64 1/2 (*.f64 (pow.f64 lambda2 3) (*.f64 1/12 (sin.f64 lambda1))))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 (+.f64 1/2 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (*.f64 1/4 (pow.f64 lambda2 2))))) (*.f64 (sin.f64 lambda1) (*.f64 1/12 (pow.f64 lambda2 3)))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 (+.f64 1/2 (+.f64 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) 1/4))) (*.f64 (pow.f64 lambda2 3) (*.f64 (sin.f64 lambda1) 1/12)))) (*.f64 (cos.f64 lambda1) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 0 (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3) -1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 lambda1 -2)))))
(-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 lambda1 -2)))))
(-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))
(+.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3) -1) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda1))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda2))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))))
(-.f64 (cos.f64 (-.f64 lambda1 lambda2)) 0)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 0 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))
(cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2)))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 lambda1 -2)))))
(-.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 (neg.f64 lambda2)) 2)) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 lambda1) 2)) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 2 (cos.f64 lambda1))) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))))
(-.f64 (*.f64 2 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (sin.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(cos.f64 (+.f64 (+.f64 lambda2 lambda2) (-.f64 (neg.f64 lambda2) lambda1)))
(cos.f64 (+.f64 lambda2 (+.f64 lambda2 (-.f64 (neg.f64 lambda2) lambda1))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))
(cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))
(cos.f64 (+.f64 lambda2 (+.f64 (*.f64 lambda1 3) (*.f64 lambda1 -4))))
(-.f64 (*.f64 (sin.f64 lambda2) (cos.f64 (+.f64 lambda1 (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda2)) (sin.f64 (+.f64 lambda1 (/.f64 (PI.f64) -2)))))
(-.f64 (*.f64 0 (cos.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (*.f64 (cos.f64 0) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))
(-.f64 0 (*.f64 (cos.f64 0) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))
(neg.f64 (*.f64 (cos.f64 0) (sin.f64 (-.f64 lambda1 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (-.f64 lambda1 lambda2))) (sin.f64 (/.f64 (PI.f64) -2))))
(-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (+.f64 lambda1 (-.f64 (*.f64 1/2 (PI.f64)) lambda2))) (sin.f64 (/.f64 (PI.f64) -2))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda1 lambda2))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 (+.f64 lambda1 (/.f64 (PI.f64) -2))))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 lambda1 (+.f64 lambda1 (/.f64 (PI.f64) -2))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 lambda1)) (cos.f64 (-.f64 (/.f64 (PI.f64) -2) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 (*.f64 1/2 (PI.f64)))) (sin.f64 (-.f64 (/.f64 (PI.f64) -2) lambda2))))
(-.f64 (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (+.f64 lambda1 lambda1))) (*.f64 (sin.f64 (+.f64 lambda1 lambda1)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))))
(cos.f64 (+.f64 lambda1 (+.f64 lambda1 (-.f64 (neg.f64 lambda2) lambda1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 0))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 2 (*.f64 1/2 (cos.f64 0))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (-.f64 2 (cos.f64 0))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) -1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (+.f64 (cos.f64 0) 1) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 0) (-.f64 1 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) -1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 -1 (*.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (cos.f64 0) -1) -1))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (*.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 1/2 (cos.f64 0))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (neg.f64 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 1 (*.f64 (cos.f64 0) 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (neg.f64 (cos.f64 0))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (cos.f64 0) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (cos.f64 0) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (+.f64 (cos.f64 0) 1) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 0) (-.f64 1 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (cos.f64 0) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (*.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 1 (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (neg.f64 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 1 (*.f64 (cos.f64 0) 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 1 (+.f64 1 (cos.f64 0)))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 1 (*.f64 2 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 1 (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (-.f64 1 (*.f64 2 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (-.f64 1 (*.f64 2 (cos.f64 0))))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 1 (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 2 (cos.f64 0)) (-.f64 1 (*.f64 2 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (*.f64 (cos.f64 0) -1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (*.f64 (cos.f64 0) -1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (neg.f64 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 1 (*.f64 (cos.f64 0) 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (*.f64 (cos.f64 0) -1)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (neg.f64 (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (neg.f64 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 1 (*.f64 (cos.f64 0) 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 (cos.f64 0) 1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (+.f64 -1 (-.f64 (-.f64 2 (cos.f64 0)) (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (-.f64 (-.f64 2 (cos.f64 0)) (cos.f64 0)) 1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 (cos.f64 0) 1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (+.f64 -1 (-.f64 (-.f64 2 (cos.f64 0)) (cos.f64 0))))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (-.f64 2 (cos.f64 0)) (cos.f64 0))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 1 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 2 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (+.f64 (cos.f64 0) 1))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 2 (cos.f64 0)) (+.f64 -1 (-.f64 (-.f64 2 (cos.f64 0)) (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 2 (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 2 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 1 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (cos.f64 0) 1) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 2 (cos.f64 0)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (+.f64 1 (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 2 (cos.f64 0))))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (cos.f64 0) 2) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 (cos.f64 0) 2))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (*.f64 2 (cos.f64 0)) (-.f64 (-.f64 2 (cos.f64 0)) (*.f64 2 (cos.f64 0)))))
(*.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (+.f64 1 (cos.f64 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (+.f64 (cos.f64 0) 1) 1/2))
(*.f64 (+.f64 (cos.f64 0) 1) (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (*.f64 (cos.f64 0) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 -1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (cos.f64 0) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) 1/2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (*.f64 1/2 (cos.f64 0)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 (cos.f64 0) -1/2))
(*.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 -1/2 (cos.f64 0)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (+.f64 -1/2 (cos.f64 0)) 2))
(*.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 -1/2 (cos.f64 0))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 1 (/.f64 (cos.f64 0) -2)))
(*.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 1 (/.f64 (cos.f64 0) -2)))
(*.f64 2 (*.f64 (+.f64 1 (/.f64 (cos.f64 0) -2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 1 (/.f64 (cos.f64 0) -2))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) (+.f64 (cos.f64 0) (/.f64 (cos.f64 0) -2)))
(*.f64 (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 0) (/.f64 (cos.f64 0) -2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (+.f64 (cos.f64 0) (/.f64 (cos.f64 0) -2)) 2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 2 (+.f64 (cos.f64 0) (/.f64 (cos.f64 0) -2))))
(*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) -1/2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 1/2 (cos.f64 0)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 2 (cos.f64 0)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (+.f64 (cos.f64 0) 1) 1/2))
(*.f64 (+.f64 (cos.f64 0) 1) (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (cos.f64 0) 2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 -1/2 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 2 (cos.f64 0)))
(*.f64 (*.f64 2 (*.f64 1/2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (neg.f64 (cos.f64 0)) (+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (cos.f64 0) 4) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (cos.f64 0) -2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 2 (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (+.f64 (+.f64 1 (cos.f64 0)) -1) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (+.f64 (cos.f64 0) 1) 2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 0) (-.f64 1 (cos.f64 0))))
(*.f64 (+.f64 (*.f64 (cos.f64 0) 2) -1) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 -1 (*.f64 2 (cos.f64 0))))
(*.f64 (/.f64 (*.f64 (cos.f64 0) -1) -1) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (cos.f64 0) (-.f64 (*.f64 2 (cos.f64 0)) 2)))
(*.f64 (/.f64 (cos.f64 0) -4) (+.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2)))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) -1)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) -2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 lambda1 (*.f64 1/2 (PI.f64)))))) 2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)))) -2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 lambda1 (*.f64 1/2 (PI.f64)))))) 2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))))) -2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) -2)
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))) 2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) 2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 lambda1 (*.f64 1/2 (PI.f64)))))) 2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (-.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (-.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64))))))) 2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (neg.f64 lambda2) lambda1))) (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) 2)
(/.f64 (-.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) -2)
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (-.f64 lambda1 (*.f64 1/2 (PI.f64)))))) 2))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 (-.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64))) (*.f64 1/2 (PI.f64)))))) 2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2)))) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 -2))) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(/.f64 (-.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2)))) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))) (cos.f64 (-.f64 lambda1 lambda2))) (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (-.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) -2)
(pow.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1)
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(neg.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 0)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 0 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2) 1/2)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/2 (sin.f64 lambda1))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) 1/2)) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(+.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 1/2 (sin.f64 lambda1))) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) 1/2)) (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))
(*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 1 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 -1 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2) -1)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(pow.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) 1)
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (-.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2) 1/2))
(-.f64 1/2 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))) 1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))

localize248.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
1.5b
(-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
3.0b
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))
Compiler

Compiled 396 to 198 computations (50% saved)

series3.0ms (0%)

Counts
1 → 24
Calls

6 calls:

TimeVariablePointExpression
1.0ms
lambda2
@0
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))
1.0ms
lambda1
@inf
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))
1.0ms
lambda1
@-inf
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))
0.0ms
lambda2
@inf
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))
0.0ms
lambda1
@0
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))

rewrite74.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1930×rational_best-1
890×rational_best-4
890×rational_best-2
890×rational_best-3
890×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01333
18733
215633
324233
445533
5106633
6316533
7761733
Stop Event
node limit
Counts
1 → 12
Calls
Call 1
Inputs
(-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2))))))

simplify33.0ms (0%)

Algorithm
egg-herbie
Rules
68×rational_best-simplify-2
68×rational_best-simplify-1
34×rational_best-simplify-43
14×rational_best-simplify-44
12×rational_best-simplify-47
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0551234
1941234
21291222
31581222
41921222
52061222
62101222
Stop Event
saturated
Counts
36 → 32
Calls
Call 1
Inputs
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(*.f64 -1/2 (*.f64 lambda2 lambda1))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 lambda1)) (*.f64 1/4 (pow.f64 lambda1 2)))
(+.f64 (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3))) (+.f64 (*.f64 -1/2 (*.f64 lambda2 lambda1)) (*.f64 1/4 (pow.f64 lambda1 2))))
(+.f64 (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3))) (+.f64 (*.f64 -1/2 (*.f64 lambda2 lambda1)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/4 (pow.f64 lambda1 2)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2))
(+.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 0)
(+.f64 0 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)))
(+.f64 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2) 1/2)
(*.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)
(*.f64 1 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)))
(*.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2) -1)
(*.f64 -1 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2))
(/.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)
(/.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2) -1)
(pow.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)
(neg.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2))
Outputs
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(*.f64 -1/2 (*.f64 lambda2 lambda1))
(*.f64 -1/2 (*.f64 lambda1 lambda2))
(*.f64 lambda1 (*.f64 -1/2 lambda2))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 lambda1)) (*.f64 1/4 (pow.f64 lambda1 2)))
(+.f64 (*.f64 -1/2 (*.f64 lambda1 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))
(+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))
(+.f64 (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3))) (+.f64 (*.f64 -1/2 (*.f64 lambda2 lambda1)) (*.f64 1/4 (pow.f64 lambda1 2))))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (+.f64 (*.f64 -1/2 (*.f64 lambda1 lambda2)) (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3)))))
(+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3)))))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 lambda2 (+.f64 (*.f64 1/12 (pow.f64 lambda1 3)) (*.f64 lambda1 -1/2))))
(+.f64 (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3))) (+.f64 (*.f64 -1/2 (*.f64 lambda2 lambda1)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/4 (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3))) (+.f64 (*.f64 -1/2 (*.f64 lambda1 lambda2)) (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 -1/48 (pow.f64 lambda1 4)))))
(+.f64 (*.f64 1/12 (*.f64 lambda2 (pow.f64 lambda1 3))) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 -1/48 (pow.f64 lambda1 4)))))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 lambda2 (+.f64 (*.f64 1/12 (pow.f64 lambda1 3)) (*.f64 lambda1 -1/2)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 0)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 0 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2) 1/2)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(*.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(*.f64 1 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(*.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(*.f64 -1 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(/.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(/.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(pow.f64 (+.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) -1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(neg.f64 (-.f64 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1))) 1/2))
(-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))
(+.f64 1/2 (*.f64 -1/2 (+.f64 (cos.f64 lambda1) (*.f64 lambda2 (sin.f64 lambda1)))))

localize199.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
3.0b
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
17.5b
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
Compiler

Compiled 523 to 299 computations (42.8% saved)

series2.0ms (0%)

Counts
2 → 32
Calls

12 calls:

TimeVariablePointExpression
0.0ms
phi1
@0
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
0.0ms
phi2
@0
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
0.0ms
phi1
@inf
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
0.0ms
phi2
@-inf
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
0.0ms
phi1
@-inf
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))

rewrite80.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1706×rational_best-4
1706×rational_best-2
1706×rational_best-3
1706×rational_best-1
766×exponential-1
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
01550
19950
218250
333550
474250
5204134
6637234
Stop Event
node limit
Counts
2 → 126
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) 0) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))) (*.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 phi1)) (cos.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (+.f64 phi2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 phi1 -2)) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (*.f64 phi1 -2)) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 phi2 (*.f64 phi1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))) (*.f64 (sin.f64 (+.f64 phi2 (*.f64 phi1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 2 (*.f64 (cos.f64 0) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) 1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 0) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 2 (cos.f64 0)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 0) 2) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) 0) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))) (*.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 phi1)) (cos.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (+.f64 phi2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 phi1 -2)) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (*.f64 phi1 -2)) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 phi2 (*.f64 phi1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))) (*.f64 (sin.f64 (+.f64 phi2 (*.f64 phi1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 2 (*.f64 (cos.f64 0) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) 1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 0) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 2 (cos.f64 0)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 0) 2) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (-.f64 phi1 phi2))))))))

simplify232.0ms (0.2%)

Algorithm
egg-herbie
Rules
1508×rational_best-simplify-49
1210×rational_best-simplify-46
1054×rational_best-simplify-1
898×rational_best-simplify-44
894×rational_best-simplify-53
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
02866262
17186122
216946062
343915414
Stop Event
node limit
Counts
158 → 171
Calls
Call 1
Inputs
(cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) phi2)))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (pow.f64 phi2 2))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) phi2))))
(+.f64 (*.f64 -1/48 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (pow.f64 phi2 3))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (pow.f64 phi2 2))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) phi2)))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(sin.f64 (*.f64 -1/2 phi2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (pow.f64 phi1 3))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 1/2 phi1))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2))))
(+.f64 (*.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(+.f64 0 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1)))))
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (-.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) 0) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))) (*.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 phi1)) (cos.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (+.f64 phi2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 -2)) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (*.f64 phi1 -2)) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 (*.f64 phi1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))) (*.f64 (sin.f64 (+.f64 phi2 (*.f64 phi1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 0))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 2 (*.f64 (cos.f64 0) 1/2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))
(*.f64 1 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 1/2)
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 0) 1/2))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)
(*.f64 (-.f64 2 (cos.f64 0)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 (*.f64 (cos.f64 0) 2) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -1/2)
(/.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 2)
(/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(+.f64 0 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1)))))
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (-.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) 0) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))) (*.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 phi1)) (cos.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (+.f64 phi2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 -2)) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (*.f64 phi1 -2)) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 (*.f64 phi1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))) (*.f64 (sin.f64 (+.f64 phi2 (*.f64 phi1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 0))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 2 (*.f64 (cos.f64 0) 1/2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))
(*.f64 1 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 1/2)
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 0) 1/2))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)
(*.f64 (-.f64 2 (cos.f64 0)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 (*.f64 (cos.f64 0) 2) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -1/2)
(/.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 2)
(/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (-.f64 phi1 phi2))))
Outputs
(cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64))))
(+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))
(+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))))
(+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/2 phi1)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64))))))
(+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (pow.f64 phi1 2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/2 phi1)) (+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/2 phi1)) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))))
(+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (pow.f64 phi1 2))) (+.f64 (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 (pow.f64 phi1 3) (*.f64 1/48 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))))))))
(+.f64 (+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 1/48 (pow.f64 phi1 3)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/2 phi1)) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/2 phi1)) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 1/48 (pow.f64 phi1 3)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi1 2))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi2 (PI.f64)))) (+.f64 (*.f64 1/48 (pow.f64 phi1 3)) (*.f64 -1/2 phi1)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (+.f64 phi2 (PI.f64)) (neg.f64 phi1))))
(cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 (neg.f64 phi1) (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (+.f64 phi2 (PI.f64)) (neg.f64 phi1))))
(cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 (neg.f64 phi1) (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (+.f64 phi2 (PI.f64)) (neg.f64 phi1))))
(cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 (neg.f64 phi1) (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (+.f64 phi2 (PI.f64)) (neg.f64 phi1))))
(cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 (neg.f64 phi1) (PI.f64)))))
(cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) phi2)))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 phi2 1/2)))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (pow.f64 phi2 2))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) phi2))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 phi2 1/2))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 phi2 1/2))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2))))
(+.f64 (*.f64 -1/48 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (pow.f64 phi2 3))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (pow.f64 phi2 2))) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) phi2)))))
(+.f64 (+.f64 (*.f64 1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2)))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/48 (pow.f64 phi2 3)))))
(+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 phi2 1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/48 (pow.f64 phi2 3))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 -1/48 (pow.f64 phi2 3)) (*.f64 phi2 1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 -1/8 (pow.f64 phi2 2))) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 (PI.f64)))) (+.f64 (*.f64 -1/48 (pow.f64 phi2 3)) (*.f64 phi2 1/2)))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (*.f64 phi2 -1)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (neg.f64 phi2)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (*.f64 phi2 -1)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (neg.f64 phi2)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (*.f64 phi2 -1)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (neg.f64 phi2)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (*.f64 -1 phi2) phi1) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (*.f64 phi2 -1)) (PI.f64))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi1 (neg.f64 phi2)) (PI.f64))))
(sin.f64 (*.f64 -1/2 phi2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 -1/2 phi2)))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 1/2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 1/2)) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (pow.f64 phi1 3))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 -1/2 phi2))))) (+.f64 (*.f64 -1/48 (*.f64 (pow.f64 phi1 3) (cos.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 1/2))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (pow.f64 phi1 3) -1/48))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (pow.f64 phi1 3) -1/48) (*.f64 phi1 1/2))) (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 phi1 1/2) (*.f64 (pow.f64 phi1 3) -1/48)))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 phi1) phi2)))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 1/2 phi1))
(sin.f64 (*.f64 phi1 1/2))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))
(+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 phi1 1/2)))))
(+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 (*.f64 -1/2 phi2) (cos.f64 (*.f64 phi1 1/2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2))))
(+.f64 (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 phi1 1/2)))) (+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2))))))
(+.f64 (sin.f64 (*.f64 phi1 1/2)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 phi1 1/2)))) (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2))))))
(+.f64 (*.f64 (*.f64 -1/2 phi2) (cos.f64 (*.f64 phi1 1/2))) (+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2))))))
(+.f64 (*.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))))
(+.f64 (+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 phi1 1/2))))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2)))) (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (cos.f64 (*.f64 phi1 1/2))))))
(+.f64 (+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 phi1 1/2))))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2)))) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 1/48 (pow.f64 phi2 3)))))
(+.f64 (+.f64 (sin.f64 (*.f64 phi1 1/2)) (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2))))) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (+.f64 (*.f64 1/48 (pow.f64 phi2 3)) (*.f64 -1/2 phi2))))
(+.f64 (sin.f64 (*.f64 phi1 1/2)) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 phi1 1/2)))) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (+.f64 (*.f64 -1/2 phi2) (*.f64 1/48 (pow.f64 phi2 3))))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi2) phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (neg.f64 phi2))))
(+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 0 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(-.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(cos.f64 (+.f64 (-.f64 phi1 phi2) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (-.f64 phi1 phi2))))
(cos.f64 (+.f64 (-.f64 phi1 phi2) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) 0) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 (*.f64 0 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 0 (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(neg.f64 (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 phi2 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 (neg.f64 phi1))))
(cos.f64 (+.f64 (+.f64 phi2 (neg.f64 phi1)) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))))
(cos.f64 (+.f64 phi2 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1)))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))) (*.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))
(cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))
(cos.f64 (+.f64 phi2 (+.f64 phi1 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 phi1)) (cos.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 phi2 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 (neg.f64 phi1))))
(cos.f64 (+.f64 (+.f64 phi2 (neg.f64 phi1)) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (+.f64 phi2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (+.f64 phi2 phi2) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 -2)) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (*.f64 phi1 -2)) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 (*.f64 phi1 -2) (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 (+.f64 phi2 phi1) (*.f64 phi1 -2))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 (+.f64 phi1 (*.f64 phi1 -2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 phi2))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 (+.f64 phi2 phi2) (neg.f64 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 (*.f64 phi1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))) (*.f64 (sin.f64 (+.f64 phi2 (*.f64 phi1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))))
(cos.f64 (+.f64 (+.f64 phi2 (*.f64 phi1 3)) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 0))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 2 (*.f64 (cos.f64 0) 1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (-.f64 2 (cos.f64 0))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 (cos.f64 0) 1) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 0) (-.f64 2 (+.f64 (cos.f64 0) 1))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (-.f64 (cos.f64 0) 2) (-.f64 -1 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 0) (+.f64 1 (-.f64 (cos.f64 0) 2))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (*.f64 2 (cos.f64 0)) -1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 -1 (*.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (cos.f64 0)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 0) (-.f64 (*.f64 2 (cos.f64 0)) 2)))
(*.f64 1 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 1/2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 0) 1/2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (-.f64 2 (cos.f64 0)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 1/2 (*.f64 (+.f64 (cos.f64 0) 1) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 0) 1)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 1/2 (+.f64 (cos.f64 0) 1)))
(*.f64 (*.f64 (cos.f64 0) 2) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -1/2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))
(sin.f64 (+.f64 (PI.f64) (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 0 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2))))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 0)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 0 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (-.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))))
(-.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))) (cos.f64 (-.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (-.f64 phi1 phi2)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(cos.f64 (+.f64 (-.f64 phi1 phi2) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (-.f64 phi1 phi2))))
(cos.f64 (+.f64 (-.f64 phi1 phi2) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) 0) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 (*.f64 0 (cos.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 0 (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(neg.f64 (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (-.f64 phi1 phi2)) (PI.f64))) (cos.f64 0)))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 phi2) (sin.f64 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 phi2 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 (neg.f64 phi1))))
(cos.f64 (+.f64 (+.f64 phi2 (neg.f64 phi1)) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))) (*.f64 (sin.f64 phi2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1))))
(cos.f64 (+.f64 phi2 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) phi1)))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi1 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))) (*.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))
(cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))
(cos.f64 (+.f64 phi2 (+.f64 phi1 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 phi1)) (cos.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 phi1)) (sin.f64 (+.f64 phi2 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 phi2 (+.f64 (neg.f64 phi1) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 (neg.f64 phi1))))
(cos.f64 (+.f64 (+.f64 phi2 (neg.f64 phi1)) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 phi2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (+.f64 phi2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (+.f64 phi2 phi2) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 -2)) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (*.f64 phi1 -2)) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 (*.f64 phi1 -2) (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 phi1))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 (+.f64 phi2 phi1) (*.f64 phi1 -2))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 (+.f64 phi1 (*.f64 phi1 -2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi2 phi2) (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2)))))))
(cos.f64 (+.f64 (neg.f64 (+.f64 phi2 phi1)) (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi2 phi2))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 (+.f64 phi2 phi2) (neg.f64 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (+.f64 phi2 (*.f64 phi1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))) (*.f64 (sin.f64 (+.f64 phi2 (*.f64 phi1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4)))))
(cos.f64 (+.f64 (+.f64 phi2 (*.f64 phi1 3)) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (*.f64 phi1 4))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 0))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 2 (*.f64 (cos.f64 0) 1/2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 (cos.f64 0) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (-.f64 2 (cos.f64 0))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 1 (cos.f64 0)) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (+.f64 (cos.f64 0) 1) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 0) (-.f64 2 (+.f64 (cos.f64 0) 1))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (-.f64 (cos.f64 0) 2) (-.f64 -1 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 0) (+.f64 1 (-.f64 (cos.f64 0) 2))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (*.f64 2 (cos.f64 0)) -1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 -1 (*.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (cos.f64 0)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 0) 2) (-.f64 2 (cos.f64 0))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 0) (-.f64 (*.f64 2 (cos.f64 0)) 2)))
(*.f64 1 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 1/2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (cos.f64 0) 1/2))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (-.f64 2 (cos.f64 0)) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 2 (cos.f64 0)))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 1/2 (*.f64 (+.f64 (cos.f64 0) 1) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (+.f64 (cos.f64 0) 1)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (*.f64 1/2 (+.f64 (cos.f64 0) 1)))
(*.f64 (*.f64 (cos.f64 0) 2) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -1/2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) 2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) -1)
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)) -2)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))
(neg.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)))
(+.f64 (neg.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) -2) (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2)))))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 phi1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (-.f64 phi1 phi2))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
(cos.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi2 phi1))))

localize616.0ms (0.4%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.4b
(*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.6b
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 526 to 312 computations (40.7% saved)

eval6.2s (4.1%)

Compiler

Compiled 167605 to 106972 computations (36.2% saved)

prune4.7s (3.2%)

Pruning

143 alts after pruning (143 fresh and 0 done)

PrunedKeptTotal
New2001902091
Fresh185371
Picked101
Done404
Total20241432167
Error
12.1b
Counts
2167 → 143
Alt Table
Click to see full alt table
StatusErrorProgram
26.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
36.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
49.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
39.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
38.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
43.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
52.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
36.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
51.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
32.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
47.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
44.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
38.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
51.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
46.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
23.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
34.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
35.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
13.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
34.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
44.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
34.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
41.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
31.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
42.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
31.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
35.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
31.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
42.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
31.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
36.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
44.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
39.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
42.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
44.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
51.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
40.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
35.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
32.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
46.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
46.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
34.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
34.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
41.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
42.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
46.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
40.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
34.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
25.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
37.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
46.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Compiler

Compiled 21066 to 15550 computations (26.2% saved)

localize509.0ms (0.3%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.3b
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.4b
(pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
0.5b
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
Compiler

Compiled 585 to 378 computations (35.4% saved)

series4.0ms (0%)

Counts
2 → 72
Calls

18 calls:

TimeVariablePointExpression
0.0ms
phi1
@0
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.0ms
phi2
@0
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.0ms
lambda1
@0
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.0ms
lambda2
@0
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
0.0ms
phi2
@-inf
(pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2)

rewrite65.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1244×rational_best-simplify-46
1242×rational_best-simplify-49
1206×rational_best-1
1202×rational_best-4
1202×rational_best-2
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
028124
1196124
2425120
31059108
42911108
Stop Event
node limit
Counts
2 → 11
Calls
Call 1
Inputs
(pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 0)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 1)))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 1)))))

simplify183.0ms (0.1%)

Algorithm
egg-herbie
Rules
1852×rational_best-simplify-49
1522×rational_best-simplify-46
1172×rational_best-simplify-2
1112×rational_best-simplify-1
842×rational_best-simplify-51
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
02096047
14885779
29455631
316255401
423925231
535025221
655955221
Stop Event
node limit
Counts
83 → 148
Calls
Call 1
Inputs
(pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))))
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))))
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (pow.f64 phi1 4) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 -1/720 (*.f64 (pow.f64 phi1 6) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (pow.f64 phi1 4) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 4)))) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 2))))))
(+.f64 (*.f64 -1/720 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 6)))) (+.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 4)))) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 2)))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 0)
(+.f64 0 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2))
(-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 0)
(*.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 1)
(*.f64 1 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2))
(/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 1)
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 0)
(+.f64 0 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 0)
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 1)
(pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 1)
Outputs
(pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)))))
(+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6)))))
(+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6))))
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)
(pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2)
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 -1 (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (neg.f64 (cos.f64 (*.f64 phi1 1/2))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 -1 (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2)))))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (neg.f64 (cos.f64 (*.f64 phi1 1/2)))))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (neg.f64 (cos.f64 (*.f64 phi1 1/2))))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))) (pow.f64 phi2 2)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 -1 (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 1/8 (sin.f64 (*.f64 phi1 1/2)))) (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 1/24 (sin.f64 (*.f64 phi1 1/2))))) (pow.f64 phi2 3)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi1 1/2))) 1/6) (pow.f64 phi2 3)))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi1 1/2)) (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 phi1 1/2))))) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi1 1/2))) (*.f64 (pow.f64 phi2 3) 1/6)))))
(+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (neg.f64 (cos.f64 (*.f64 phi1 1/2))))) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi1 1/2))) (*.f64 (pow.f64 phi2 3) 1/6)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi1 1/2))) (+.f64 (*.f64 (pow.f64 phi2 3) 1/6) (neg.f64 phi2)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 phi1 1/2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2))) (pow.f64 phi2 2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi1 1/2))) (+.f64 (neg.f64 phi2) (*.f64 (pow.f64 phi2 3) 1/6)))))
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) phi1) 2))))
(*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (pow.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi2) (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (cos.f64 phi2)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (pow.f64 phi1 4) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 4) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 1/24 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (pow.f64 phi1 4) (cos.f64 phi2)))) (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) phi1) 2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (pow.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))) (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 1/24 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi1 4))))))
(+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 1/24 (pow.f64 phi1 4)) (*.f64 -1/2 (pow.f64 phi1 2)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (*.f64 (pow.f64 phi1 4) (*.f64 1/24 (cos.f64 phi2))) (+.f64 (cos.f64 phi2) (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (cos.f64 phi2))))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (pow.f64 phi1 4))) (+.f64 (cos.f64 phi2) (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (cos.f64 phi2))))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 -1/720 (*.f64 (pow.f64 phi1 6) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (pow.f64 phi1 4) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (+.f64 (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 4) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (*.f64 -1/720 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 6) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) phi1) 2))) (+.f64 (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 1/24 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (pow.f64 phi1 4) (cos.f64 phi2))))) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/720 (pow.f64 phi1 6)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (pow.f64 (*.f64 phi1 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 1/24 (*.f64 (cos.f64 phi2) (pow.f64 phi1 4)))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/720 (pow.f64 phi1 6))))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi2) (*.f64 -1/720 (*.f64 (cos.f64 phi2) (pow.f64 phi1 6))))) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 1/24 (pow.f64 phi1 4)) (*.f64 -1/2 (pow.f64 phi1 2)))))
(+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 -1/720 (pow.f64 phi1 6)) (+.f64 (*.f64 1/24 (pow.f64 phi1 4)) (*.f64 -1/2 (pow.f64 phi1 2))))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (*.f64 -1/720 (*.f64 (cos.f64 phi2) (pow.f64 phi1 6))) (+.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (pow.f64 phi1 4))) (+.f64 (cos.f64 phi2) (*.f64 -1/2 (*.f64 (pow.f64 phi1 2) (cos.f64 phi2)))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))
(+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 2)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))))
(*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 2) (*.f64 -1/2 (cos.f64 phi1)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi1) (*.f64 -1/2 (*.f64 (pow.f64 phi2 2) (cos.f64 phi1)))))
(+.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 4)))) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (*.f64 1/24 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi1) (pow.f64 phi2 4))))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)))) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 1/24 (*.f64 (cos.f64 phi1) (pow.f64 phi2 4)))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 4) (*.f64 1/24 (cos.f64 phi1))))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (*.f64 (pow.f64 phi2 4) (*.f64 1/24 (cos.f64 phi1))) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 2) (*.f64 -1/2 (cos.f64 phi1))))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/2 (pow.f64 phi2 2)) (*.f64 1/24 (pow.f64 phi2 4))))))
(+.f64 (*.f64 -1/720 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 6)))) (+.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 4)))) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (pow.f64 phi2 2)))))))
(+.f64 (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (*.f64 1/24 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi1) (pow.f64 phi2 4)))))) (*.f64 -1/720 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi1) (pow.f64 phi2 6)))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/2 (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 1/24 (*.f64 (cos.f64 phi1) (pow.f64 phi2 4)))) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/720 (*.f64 (cos.f64 phi1) (pow.f64 phi2 6))))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 4) (*.f64 1/24 (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 -1/720 (pow.f64 phi2 6))) (*.f64 -1/2 (pow.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)))))
(+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (cos.f64 phi1) (*.f64 (pow.f64 phi2 2) (*.f64 -1/2 (cos.f64 phi1))))) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (*.f64 -1/720 (pow.f64 phi2 6)) (*.f64 1/24 (pow.f64 phi2 4))))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/720 (pow.f64 phi2 6))) (+.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/2 (pow.f64 phi2 2)) (*.f64 1/24 (pow.f64 phi2 4)))))))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (+.f64 (+.f64 (cos.f64 phi1) (*.f64 -1/2 (*.f64 (pow.f64 phi2 2) (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/720 (pow.f64 phi2 6)) (*.f64 1/24 (pow.f64 phi2 4))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))))))
(+.f64 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (*.f64 (cos.f64 phi2) (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) -1/6)) (pow.f64 lambda1 3))))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)) -1/6)))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 -1 lambda1)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 -1 lambda1)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 -1 lambda1)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 -1 lambda1)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (neg.f64 lambda2)))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (neg.f64 lambda2))))
(*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 (cos.f64 phi2))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (neg.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (neg.f64 (cos.f64 (*.f64 1/2 lambda1))))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (neg.f64 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))) (neg.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (neg.f64 (cos.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2)))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (neg.f64 lambda2)) (+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6) (pow.f64 lambda2 3)))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))) (*.f64 (cos.f64 phi1) (pow.f64 lambda2 2))) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6) (pow.f64 lambda2 3))))))
(+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 lambda2 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 (cos.f64 phi2)))))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) 1/6)) (pow.f64 lambda2 3)))))
(*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) 1/6)) (pow.f64 lambda2 3)))) (*.f64 (cos.f64 phi1) (+.f64 (neg.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (pow.f64 lambda2 3))) 1/6) (*.f64 (cos.f64 phi2) (*.f64 lambda2 (neg.f64 (cos.f64 phi1)))))))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 -1 lambda2)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 -1 lambda2)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 -1 lambda2)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 -1 lambda2)))) 2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 0)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(+.f64 0 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2))
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(-.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 0)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(*.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 1)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(*.f64 1 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2))
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(/.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) 1)
(pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 phi1 1/2))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 phi1 1/2)))) 2)
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 0)
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))
(+.f64 0 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))))
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 0)
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 1)
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))
(pow.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))) 1)
(*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))

localize162.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
1.2b
(-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))
1.5b
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
2.7b
(cos.f64 (-.f64 lambda1 lambda2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 358 to 215 computations (39.9% saved)

series1.0ms (0%)

Counts
1 → 12
Calls

3 calls:

TimeVariablePointExpression
0.0ms
lambda1
@0
(-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))
0.0ms
lambda1
@-inf
(-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))
0.0ms
lambda1
@inf
(-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))

rewrite61.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1110×rational_best-simplify-51
934×rational_best-simplify-47
928×rational_best-2
928×rational_best-1
924×rational_best-3
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0917
15617
29217
314617
430817
560817
6146317
7523817
Stop Event
node limit
Counts
1 → 21
Calls
Call 1
Inputs
(-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 1/2 (cos.f64 lambda1)) (-.f64 1/2 (cos.f64 lambda1)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 lambda1) -1/2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 lambda1)) (+.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (cos.f64 lambda1)) (*.f64 1/2 (cos.f64 lambda1)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 lambda1) 3/2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (neg.f64 (cos.f64 lambda1)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 lambda1) 1/2) (*.f64 1/2 (cos.f64 lambda1))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2))))))

simplify478.0ms (0.3%)

Algorithm
egg-herbie
Rules
1328×rational_best-simplify-51
1216×rational_best-simplify-2
1116×rational_best-simplify-55
1108×rational_best-simplify-53
1100×rational_best-simplify-54
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066653
198653
2134653
3171653
4244653
5312653
6407653
7605653
81175653
92571653
103612653
114328653
124655653
134794653
144862653
154880653
165727653
176371653
186576653
196771653
206883653
216898653
226899653
236967653
246971653
Stop Event
node limit
Counts
33 → 34
Calls
Call 1
Inputs
(*.f64 1/4 (pow.f64 lambda1 2))
(+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/4 (pow.f64 lambda1 2)))
(+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/4 (pow.f64 lambda1 2))))
(+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (+.f64 (*.f64 -1/80640 (pow.f64 lambda1 8)) (*.f64 1/4 (pow.f64 lambda1 2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (*.f64 1/2 (cos.f64 lambda1)) (-.f64 1/2 (cos.f64 lambda1)))
(+.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 0)
(+.f64 0 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))
(+.f64 (*.f64 (cos.f64 lambda1) -1/2) 1/2)
(+.f64 (neg.f64 (cos.f64 lambda1)) (+.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))
(+.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))
(+.f64 (-.f64 1/2 (cos.f64 lambda1)) (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda1) 3/2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)))
(+.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (neg.f64 (cos.f64 lambda1)))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1)))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2))
(*.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)
(*.f64 1 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))
(*.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2) -1)
(*.f64 -1 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2))
(/.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)
(/.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2) -1)
(/.f64 (-.f64 (-.f64 (cos.f64 lambda1) 1/2) (*.f64 1/2 (cos.f64 lambda1))) -1)
(pow.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)
(neg.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2))
Outputs
(*.f64 1/4 (pow.f64 lambda1 2))
(+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/4 (pow.f64 lambda1 2)))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 -1/48 (pow.f64 lambda1 4)))
(+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/4 (pow.f64 lambda1 2))))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/1440 (pow.f64 lambda1 6))))
(+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 1/1440 (pow.f64 lambda1 6))))
(+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (+.f64 (*.f64 -1/80640 (pow.f64 lambda1 8)) (*.f64 1/4 (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (+.f64 (*.f64 -1/80640 (pow.f64 lambda1 8)) (*.f64 -1/48 (pow.f64 lambda1 4)))))
(+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (+.f64 (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 -1/80640 (pow.f64 lambda1 8))) (*.f64 1/1440 (pow.f64 lambda1 6))))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (+.f64 (*.f64 -1/80640 (pow.f64 lambda1 8)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (*.f64 1/1440 (pow.f64 lambda1 6)))))
(+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (*.f64 -1/80640 (pow.f64 lambda1 8)))))
(+.f64 (*.f64 -1/48 (pow.f64 lambda1 4)) (+.f64 (*.f64 1/1440 (pow.f64 lambda1 6)) (+.f64 (*.f64 1/4 (pow.f64 lambda1 2)) (*.f64 -1/80640 (pow.f64 lambda1 8)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 (*.f64 1/2 (cos.f64 lambda1)) (-.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 0)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 0 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (*.f64 (cos.f64 lambda1) -1/2) 1/2)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (neg.f64 (cos.f64 lambda1)) (+.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (neg.f64 (cos.f64 lambda1)) (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (-.f64 1/2 (cos.f64 lambda1)) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (*.f64 (cos.f64 lambda1) 3/2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (+.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (neg.f64 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(*.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(*.f64 1 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(*.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(*.f64 -1 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(/.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(/.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(/.f64 (-.f64 (-.f64 (cos.f64 lambda1) 1/2) (*.f64 1/2 (cos.f64 lambda1))) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(pow.f64 (+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))
(neg.f64 (-.f64 (*.f64 1/2 (cos.f64 lambda1)) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(+.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2))

localize311.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
1.5b
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
2.7b
(cos.f64 (-.f64 lambda1 lambda2))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 426 to 216 computations (49.3% saved)

series1.0ms (0%)

Counts
1 → 16
Calls

6 calls:

TimeVariablePointExpression
0.0ms
lambda1
@0
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
0.0ms
lambda2
@0
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
0.0ms
lambda2
@-inf
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
0.0ms
lambda1
@-inf
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
0.0ms
lambda1
@inf
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))

rewrite60.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1420×rational_best-1
1418×rational_best-4
1418×rational_best-2
1418×rational_best-3
1418×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0917
15517
29217
318417
442217
5108017
6352117
Stop Event
node limit
Counts
1 → 30
Calls
Call 1
Inputs
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (-.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (cos.f64 (-.f64 lambda1 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 -1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (cos.f64 (-.f64 lambda1 lambda2))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 -1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))))))

simplify80.0ms (0.1%)

Algorithm
egg-herbie
Rules
1292×rational_best-simplify-49
1106×rational_best-simplify-53
1096×rational_best-simplify-46
868×rational_best-simplify-47
532×rational_best-simplify-1
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
01261636
12591566
24441552
38271542
419781270
557611246
Stop Event
node limit
Counts
46 → 72
Calls
Call 1
Inputs
(-.f64 1 (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/6 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (cos.f64 (neg.f64 lambda2)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 -1 (*.f64 lambda2 (sin.f64 lambda1))) 1) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 -1 (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 1 (*.f64 1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 -1 (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (*.f64 1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1)))))) (cos.f64 lambda1))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(+.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(+.f64 0 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 0)
(+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (-.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(+.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))))
(+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2))
(+.f64 (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(+.f64 (-.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2))
(+.f64 (-.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(+.f64 (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))
(+.f64 (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))
(*.f64 1 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -1)
(*.f64 -1 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))
(*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -1)
(/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(/.f64 (-.f64 (+.f64 -1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (cos.f64 (-.f64 lambda1 lambda2))) -1)
(/.f64 (-.f64 (+.f64 -1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) -1)
(pow.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))
Outputs
(-.f64 1 (cos.f64 (neg.f64 lambda2)))
(-.f64 1 (cos.f64 lambda2))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (cos.f64 lambda2))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/2 (pow.f64 lambda1 2))))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/2 (pow.f64 lambda1 2)))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 1/2 (pow.f64 lambda1 2)))) (cos.f64 lambda2))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/6 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/2 (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/6 (pow.f64 lambda1 3)))))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/2 (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/6 (pow.f64 lambda1 3)) lambda1)))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/2 (pow.f64 lambda1 2))) (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 lambda1 (*.f64 -1/6 (pow.f64 lambda1 3)))))) (cos.f64 (neg.f64 lambda2)))
(-.f64 (+.f64 (*.f64 (cos.f64 lambda2) (*.f64 1/2 (pow.f64 lambda1 2))) (+.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 lambda1 (*.f64 -1/6 (pow.f64 lambda1 3)))))) (cos.f64 lambda2))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 -1 (*.f64 lambda2 (sin.f64 lambda1))) 1) (cos.f64 lambda1))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 -1 (sin.f64 lambda1)))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (*.f64 (sin.f64 lambda1) (neg.f64 lambda2))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (*.f64 (neg.f64 lambda2) (sin.f64 lambda1))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (*.f64 lambda2 (neg.f64 (sin.f64 lambda1)))) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 -1 (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 1 (*.f64 1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 -1 (sin.f64 lambda1))) (+.f64 1 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (cos.f64 lambda1))
(-.f64 (+.f64 (+.f64 1 (*.f64 (sin.f64 lambda1) (neg.f64 lambda2))) (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 (neg.f64 lambda2) (sin.f64 lambda1)) (+.f64 1 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (+.f64 (*.f64 (neg.f64 lambda2) (sin.f64 lambda1)) (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (+.f64 (*.f64 lambda2 (neg.f64 (sin.f64 lambda1))) (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 -1 (*.f64 lambda2 (sin.f64 lambda1))) (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))) (*.f64 1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1)))))) (cos.f64 lambda1))
(-.f64 (+.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (pow.f64 lambda2 3) (*.f64 1/6 (sin.f64 lambda1)))) (+.f64 1 (*.f64 lambda2 (*.f64 -1 (sin.f64 lambda1))))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (+.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (pow.f64 lambda2 3) (*.f64 (sin.f64 lambda1) 1/6))) (*.f64 (sin.f64 lambda1) (neg.f64 lambda2)))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (+.f64 (*.f64 (neg.f64 lambda2) (sin.f64 lambda1)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (pow.f64 lambda2 3) (*.f64 (sin.f64 lambda1) 1/6))))) (cos.f64 lambda1))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 1/6 (pow.f64 lambda2 3)) (neg.f64 lambda2))))) (cos.f64 lambda1))
(-.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (+.f64 1 (*.f64 (sin.f64 lambda1) (+.f64 (neg.f64 lambda2) (*.f64 1/6 (pow.f64 lambda2 3)))))) (cos.f64 lambda1))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 0 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 0)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2) (-.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(+.f64 (-.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (cos.f64 lambda1)) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (cos.f64 (-.f64 lambda1 lambda2)))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (*.f64 3 (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 lambda2 -2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (*.f64 lambda2 -2)) (cos.f64 (+.f64 lambda2 lambda1)))))
(+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (neg.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 1 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))
(+.f64 (-.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (cos.f64 lambda1)) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (-.f64 1 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2)))) (+.f64 1 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+.f64 (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 3))
(+.f64 (*.f64 3 (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 4)))
(+.f64 (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (*.f64 lambda2 -2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (*.f64 lambda2 -2))) (-.f64 1 (*.f64 (cos.f64 (*.f64 lambda2 -2)) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 1 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 -1 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1) -1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (+.f64 -1 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (cos.f64 (-.f64 lambda1 lambda2))) -1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (+.f64 -1 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2)))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) -1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 1)
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))
(neg.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))
(-.f64 1 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))
(-.f64 1 (cos.f64 (-.f64 lambda1 lambda2)))

localize379.0ms (0.3%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.4b
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
0.7b
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
2.7b
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 467 to 307 computations (34.3% saved)

series5.0ms (0%)

Counts
3 → 52
Calls

21 calls:

TimeVariablePointExpression
1.0ms
lambda1
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
1.0ms
lambda2
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
0.0ms
phi1
@0
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
0.0ms
phi1
@-inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
0.0ms
phi1
@inf
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))

rewrite88.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
2334×rational_best-1
972×rational_best-4
972×rational_best-2
972×rational_best-3
972×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
020101
1132101
2227101
3419101
4919101
52548101
67794101
Stop Event
node limit
Counts
3 → 74
Calls
Call 1
Inputs
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (cos.f64 (+.f64 lambda2 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 lambda1 -2)) (cos.f64 (+.f64 (+.f64 lambda1 lambda2) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 lambda1 -2)) (sin.f64 (+.f64 (+.f64 lambda1 lambda2) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)) (sin.f64 (PI.f64))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 lambda2) (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)))) (*.f64 (sin.f64 (neg.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda2 lambda2) (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 0) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 0)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1)))))

simplify199.0ms (0.1%)

Algorithm
egg-herbie
Rules
1266×rational_best-simplify-49
1156×rational_best-simplify-1
988×rational_best-simplify-46
764×rational_best-simplify-2
758×rational_best-simplify-47
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
03796754
18706542
219006506
342396378
Stop Event
node limit
Counts
126 → 214
Calls
Call 1
Inputs
(sin.f64 (*.f64 -1/2 lambda2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2)))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 3))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 1/2 lambda1))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1))))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1)))))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (*.f64 (-.f64 1/48 (*.f64 1/24 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 phi1 4)) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 1/1440 (*.f64 -1/720 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 phi1 6))) (+.f64 (*.f64 (-.f64 1/48 (*.f64 1/24 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 phi1 4)) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) 1) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))) (*.f64 -1 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (pow.f64 lambda1 3)))))
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 lambda2 3)))))
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 0)
(+.f64 0 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 0)
(-.f64 0 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(-.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(-.f64 (/.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1))))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (cos.f64 (+.f64 lambda2 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 -2)) (cos.f64 (+.f64 (+.f64 lambda1 lambda2) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 lambda1 -2)) (sin.f64 (+.f64 (+.f64 lambda1 lambda2) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)) (sin.f64 (PI.f64))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 lambda2) (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)))) (*.f64 (sin.f64 (neg.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda2 lambda2) (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 0))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 2 (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))
(*.f64 1 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 0) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/2)
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 0) 1/2))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (cos.f64 0))
(*.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 1/2)
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(/.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 2)
(/.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) -1)
(/.f64 (+.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) 2)
(/.f64 (+.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) 2)
(/.f64 (-.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -2)
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -2)
(/.f64 (-.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2)
(/.f64 (neg.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) -2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) 2)
(/.f64 (-.f64 0 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))) 2)
(/.f64 (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 2)
(/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)
(neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))
(cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)) -1)
(*.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 0)
(+.f64 0 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 0)
(*.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1)
(/.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1)
Outputs
(sin.f64 (*.f64 -1/2 lambda2))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2)))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2)))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 3))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/48 (pow.f64 lambda1 3))))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/48 (pow.f64 lambda1 3))))))
(+.f64 (sin.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (pow.f64 lambda1 2))) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (+.f64 (*.f64 1/2 lambda1) (*.f64 -1/48 (pow.f64 lambda1 3))))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2)))
(sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1))))
(sin.f64 (*.f64 1/2 lambda1))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (*.f64 -1/2 (cos.f64 (*.f64 1/2 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1))))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (pow.f64 lambda2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 lambda1))))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (*.f64 -1/2 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 1/2 lambda1)))))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 lambda1)))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/48 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (pow.f64 lambda2 3))))))
(+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 1/48 (pow.f64 lambda2 3))))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (+.f64 (+.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (*.f64 -1/2 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 1/48 (pow.f64 lambda2 3)))))
(+.f64 (sin.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 -1/8 (pow.f64 lambda2 2))) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (+.f64 (*.f64 1/48 (pow.f64 lambda2 3)) (*.f64 -1/2 lambda2)))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1)))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1))))
(sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2))))
(-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (*.f64 (pow.f64 phi1 2) (neg.f64 (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(+.f64 (-.f64 (*.f64 (pow.f64 phi1 2) (neg.f64 (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/48 (*.f64 1/24 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 phi1 4)) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (+.f64 1 (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4)))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (+.f64 1 (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4)))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (+.f64 (*.f64 (pow.f64 phi1 2) (neg.f64 (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))) (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4)))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 1/1440 (*.f64 -1/720 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 phi1 6))) (+.f64 (*.f64 (-.f64 1/48 (*.f64 1/24 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))) (pow.f64 phi1 4)) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (+.f64 1 (*.f64 (pow.f64 phi1 2) (*.f64 -1 (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (+.f64 (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4)) (*.f64 (+.f64 1/1440 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) -1/720)) (*.f64 -1 (pow.f64 phi1 6))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (+.f64 1 (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))) (+.f64 (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4)) (neg.f64 (*.f64 (+.f64 1/1440 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) -1/720)) (pow.f64 phi1 6))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 (+.f64 1 (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4))) (*.f64 -1 (+.f64 (*.f64 (+.f64 1/1440 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) -1/720)) (pow.f64 phi1 6)) (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 (+.f64 1 (+.f64 (*.f64 (-.f64 1/48 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/24)) (pow.f64 phi1 4)) (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 1/4 (*.f64 -1/2 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (*.f64 (+.f64 1/1440 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) -1/720)) (pow.f64 phi1 6)))))) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) 1) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (neg.f64 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (neg.f64 (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)))) (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (neg.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))))) (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4)) (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))) (*.f64 -1 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2))))))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))) (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)))) (+.f64 (*.f64 -1 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 3) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/24 (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (cos.f64 (*.f64 -1/2 lambda2)))))))) 1))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (pow.f64 lambda1 3) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6))) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4)))))) (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (*.f64 (pow.f64 lambda1 3) -1/6))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (*.f64 (pow.f64 lambda1 3) -1/6))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1)))) (neg.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (*.f64 -1 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (neg.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1)))) (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (+.f64 (*.f64 -1 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/8 (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/24 (cos.f64 (*.f64 1/2 lambda1))))) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi1))))) (+.f64 1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6))) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) -1/6)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (pow.f64 lambda2 2) (*.f64 -1 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (neg.f64 (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))))) (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (+.f64 (*.f64 lambda2 (cos.f64 phi1)) (*.f64 (*.f64 (pow.f64 lambda2 3) (neg.f64 (cos.f64 phi1))) 1/6))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2))))
(pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2)))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (+.f64 (*.f64 -1/24 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))))) (pow.f64 lambda1 3)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (pow.f64 lambda1 3) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/24 (cos.f64 (*.f64 -1/2 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 -1/8 (cos.f64 (*.f64 -1/2 lambda2)))))))))
(+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (pow.f64 lambda1 3) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) -1/6))) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))
(+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (*.f64 (pow.f64 lambda1 3) -1/6)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (pow.f64 lambda1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) -1/4))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2))) (+.f64 lambda1 (*.f64 (pow.f64 lambda1 3) -1/6)))))
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))) 2)
(pow.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))) (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2))))))
(+.f64 (*.f64 -1 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (+.f64 (*.f64 1/8 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 1/24 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (pow.f64 lambda2 3)))))
(+.f64 (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (pow.f64 lambda2 3) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/8 (cos.f64 (*.f64 1/2 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/24 (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 -1 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (pow.f64 lambda2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) 1/6)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2))) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (*.f64 (pow.f64 lambda2 3) 1/6)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (+.f64 (neg.f64 lambda2) (*.f64 (pow.f64 lambda2 3) 1/6)))))
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))) 2)
(+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 0)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(+.f64 0 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 0)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(-.f64 0 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(-.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.f64 (/.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 lambda2) (sin.f64 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))
(cos.f64 (+.f64 lambda2 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1))))
(cos.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) lambda1)))
(-.f64 (*.f64 (cos.f64 (PI.f64)) (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))) (*.f64 (sin.f64 (PI.f64)) (sin.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))))
(cos.f64 (+.f64 (+.f64 lambda2 lambda1) (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1))))
(cos.f64 (+.f64 lambda2 (+.f64 lambda1 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda1)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 lambda1)) (cos.f64 (+.f64 lambda2 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))
(cos.f64 (+.f64 lambda2 (+.f64 (neg.f64 lambda1) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda1 lambda2)))))
(cos.f64 (+.f64 (+.f64 lambda2 lambda2) (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 -2)) (cos.f64 (+.f64 (+.f64 lambda1 lambda2) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 lambda1 -2)) (sin.f64 (+.f64 (+.f64 lambda1 lambda2) (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))))
(cos.f64 (+.f64 (*.f64 lambda1 -2) (+.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 lambda2 lambda1))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))
(cos.f64 (+.f64 lambda2 (+.f64 (+.f64 lambda1 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (*.f64 lambda1 -2))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)) (sin.f64 (PI.f64))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (PI.f64)))
(cos.f64 (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 lambda2 lambda2) (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)))) (*.f64 (sin.f64 (neg.f64 (+.f64 lambda1 lambda2))) (sin.f64 (-.f64 (+.f64 lambda2 lambda2) (*.f64 (+.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 lambda2 lambda1)) (-.f64 (+.f64 lambda2 lambda2) (*.f64 -1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))))
(cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4))))
(cos.f64 (+.f64 lambda2 (+.f64 (*.f64 lambda1 3) (-.f64 (*.f64 1/2 (+.f64 (-.f64 lambda1 lambda2) (PI.f64))) (*.f64 lambda1 4)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 0))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 2 (cos.f64 0)))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 1 (cos.f64 0)) 1))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (-.f64 (+.f64 1 (cos.f64 0)) (cos.f64 0)))
(*.f64 1 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 0) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1/2)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (*.f64 (cos.f64 0) 1/2))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (cos.f64 0))
(*.f64 (cos.f64 0) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))
(*.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 1/2)
(*.f64 1/2 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) 2)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 1 (cos.f64 0)) (*.f64 1/2 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(/.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 2)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 2)
(*.f64 1/2 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(/.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) -1)
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) 2)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) 2)
(*.f64 1/2 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(/.f64 (-.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -2)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -2)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (neg.f64 (*.f64 0 (sin.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2)
(*.f64 1/2 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))) -2)
(*.f64 1/2 (+.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))))
(/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2)))) -2)
(*.f64 (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2)))) -1/2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) 2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))) -2)
(/.f64 (-.f64 0 (+.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2)))) -2)
(*.f64 (+.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2)))) -1/2)
(/.f64 (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) 2)
(*.f64 (cos.f64 0) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))))
(/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2))) 2)
(/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)))) (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2)))) 2)
(/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))) -2)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 1)
(sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))
(neg.f64 (sin.f64 (*.f64 (-.f64 lambda1 lambda2) -1/2)))
(neg.f64 (sin.f64 (*.f64 -1/2 (-.f64 lambda1 lambda2))))
(cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (PI.f64)) -1/2))
(cos.f64 (*.f64 -1/2 (-.f64 (-.f64 lambda1 lambda2) (PI.f64))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(neg.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 0)
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(neg.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))
(*.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(neg.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))
(*.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(neg.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)) -1)
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(neg.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) 1)
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))
(neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)) -1)))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))))
(neg.f64 (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 0)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(+.f64 0 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(-.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 0)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(*.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)
(/.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) 1)
(pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)

localize496.0ms (0.3%)

Local error

Found 4 expressions with local error:

NewErrorProgram
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
18.3b
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
18.4b
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
29.3b
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))
Compiler

Compiled 755 to 534 computations (29.3% saved)

series5.0ms (0%)

Counts
3 → 60
Calls

15 calls:

TimeVariablePointExpression
2.0ms
lambda1
@0
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))
1.0ms
lambda2
@0
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
0.0ms
lambda2
@0
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
0.0ms
lambda1
@0
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
0.0ms
lambda1
@0
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))

rewrite81.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1940×rational_best-1
1938×rational_best-4
1938×rational_best-2
1938×rational_best-3
710×exponential-1
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
01859
112859
227945
361245
4177845
5563345
Stop Event
node limit
Counts
3 → 119
Calls
Call 1
Inputs
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 lambda1 4)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 lambda1 4)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 (sin.f64 (*.f64 lambda1 4)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 lambda1 4)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (sin.f64 (*.f64 lambda1 -4)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (/.f64 (sin.f64 (*.f64 lambda1 4)) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (/.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (sin.f64 (*.f64 lambda1 4)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 lambda1 -4)) (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)) (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (sin.f64 (*.f64 lambda1 4))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 8 (neg.f64 lambda1)))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (*.f64 lambda1 4))) (sin.f64 (*.f64 8 (neg.f64 lambda1)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 lambda1 4)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 lambda1 4)) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 lambda1 4)) (*.f64 (cos.f64 0) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 lambda1 4)) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 lambda1 4)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 (sin.f64 (*.f64 lambda1 4)) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (*.f64 lambda1 4)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 lambda1 4)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 lambda1 4)) (cos.f64 (+.f64 (*.f64 lambda1 4) (*.f64 (PI.f64) -1/2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 lambda1 -4)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 lambda1 4)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (sin.f64 (*.f64 lambda1 -4)))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (*.f64 lambda1 4))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) 1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 0 (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 0))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) 1/2) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2) (-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 0 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (-.f64 (*.f64 1/2 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (/.f64 (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 0)) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3)))) -1) (/.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) 2) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2) -2) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))) (+.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) (+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (*.f64 (cos.f64 0) (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 2 (cos.f64 0)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3))))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 0))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (/.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2)))) (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 0 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3))))))))

simplify171.0ms (0.1%)

Algorithm
egg-herbie
Rules
1304×rational_best-simplify-2
1062×rational_best-simplify-50
796×rational_best-simplify-51
580×rational_best-simplify-1
560×rational_best-simplify-44
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
03575739
18015427
217025293
345915229
475295171
Stop Event
node limit
Counts
179 → 245
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 (PI.f64)))
(+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1)))
(+.f64 (*.f64 -8 (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (pow.f64 lambda1 2))) (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1))))
(+.f64 (*.f64 -8 (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -32/3 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (pow.f64 lambda1 3))) (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1)))))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (*.f64 3 lambda1))
(+.f64 (cos.f64 (*.f64 3 lambda1)) (*.f64 -1 (*.f64 lambda2 (sin.f64 (*.f64 3 lambda1)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 3 lambda1)))) (+.f64 (cos.f64 (*.f64 3 lambda1)) (*.f64 -1 (*.f64 lambda2 (sin.f64 (*.f64 3 lambda1))))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 3 lambda1)))) (+.f64 (*.f64 1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 (*.f64 3 lambda1)))) (+.f64 (cos.f64 (*.f64 3 lambda1)) (*.f64 -1 (*.f64 lambda2 (sin.f64 (*.f64 3 lambda1)))))))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 lambda2)
(+.f64 (cos.f64 lambda2) (*.f64 -3 (*.f64 (sin.f64 lambda2) lambda1)))
(+.f64 (*.f64 -9/2 (*.f64 (cos.f64 lambda2) (pow.f64 lambda1 2))) (+.f64 (cos.f64 lambda2) (*.f64 -3 (*.f64 (sin.f64 lambda2) lambda1))))
(+.f64 (*.f64 -9/2 (*.f64 (cos.f64 lambda2) (pow.f64 lambda1 2))) (+.f64 (*.f64 9/2 (*.f64 (sin.f64 lambda2) (pow.f64 lambda1 3))) (+.f64 (cos.f64 lambda2) (*.f64 -3 (*.f64 (sin.f64 lambda2) lambda1)))))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (*.f64 3 lambda1))
(+.f64 (sin.f64 (*.f64 3 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 3 lambda1))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 3 lambda1)))) (+.f64 (sin.f64 (*.f64 3 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 3 lambda1)))))
(+.f64 (*.f64 -1/6 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 3 lambda1)))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 3 lambda1)))) (+.f64 (sin.f64 (*.f64 3 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 3 lambda1))))))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 lambda2)
(+.f64 (*.f64 3 (*.f64 (cos.f64 lambda2) lambda1)) (sin.f64 lambda2))
(+.f64 (*.f64 3 (*.f64 (cos.f64 lambda2) lambda1)) (+.f64 (sin.f64 lambda2) (*.f64 -9/2 (*.f64 (sin.f64 lambda2) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 -9/2 (*.f64 (cos.f64 lambda2) (pow.f64 lambda1 3))) (+.f64 (*.f64 3 (*.f64 (cos.f64 lambda2) lambda1)) (+.f64 (sin.f64 lambda2) (*.f64 -9/2 (*.f64 (sin.f64 lambda2) (pow.f64 lambda1 2))))))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(+.f64 (sin.f64 (*.f64 lambda1 4)) 0)
(+.f64 0 (sin.f64 (*.f64 lambda1 4)))
(+.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 (sin.f64 (*.f64 lambda1 4)) 2))
(-.f64 (sin.f64 (*.f64 lambda1 4)) 0)
(-.f64 0 (sin.f64 (*.f64 lambda1 -4)))
(-.f64 0 (/.f64 (sin.f64 (*.f64 lambda1 4)) -1))
(-.f64 0 (/.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) -2))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (sin.f64 (*.f64 lambda1 4)))
(-.f64 (sin.f64 (*.f64 lambda1 -4)) (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)) (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (sin.f64 (*.f64 lambda1 4))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 8 (neg.f64 lambda1)))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (*.f64 lambda1 4))) (sin.f64 (*.f64 8 (neg.f64 lambda1)))))
(*.f64 (sin.f64 (*.f64 lambda1 4)) 1)
(*.f64 (sin.f64 (*.f64 lambda1 4)) (cos.f64 0))
(*.f64 (sin.f64 (*.f64 lambda1 4)) (*.f64 (cos.f64 0) (cos.f64 0)))
(*.f64 (sin.f64 (*.f64 lambda1 4)) (-.f64 2 (cos.f64 0)))
(*.f64 1 (sin.f64 (*.f64 lambda1 4)))
(*.f64 2 (*.f64 (sin.f64 (*.f64 lambda1 4)) 1/2))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 lambda1 4)))
(*.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) 1/2)
(/.f64 (sin.f64 (*.f64 lambda1 4)) 1)
(/.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) 2)
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 lambda1 4)) (cos.f64 (+.f64 (*.f64 lambda1 4) (*.f64 (PI.f64) -1/2)))) 2)
(/.f64 (sin.f64 (*.f64 lambda1 -4)) -1)
(pow.f64 (sin.f64 (*.f64 lambda1 4)) 1)
(neg.f64 (sin.f64 (*.f64 lambda1 -4)))
(sin.f64 (*.f64 lambda1 4))
(+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(+.f64 0 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(+.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2))
(+.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(+.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) 1/2)))
(+.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))))
(+.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 0 (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3))))))
(+.f64 (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))
(+.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 0))))
(+.f64 (*.f64 (cos.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(-.f64 0 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))
(-.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2))
(-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) 1/2) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(-.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))))
(-.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3)))))
(-.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(-.f64 (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2) (-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 0 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (-.f64 (*.f64 1/2 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (/.f64 (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))))
(-.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 0)) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (/.f64 (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3)))) -1) (/.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) -1))
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) 2) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) 2))
(-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2) -2) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) -2))
(-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))) (+.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))
(-.f64 (+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) (+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 0))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (*.f64 (cos.f64 0) (cos.f64 0)))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 2 (cos.f64 0)))
(*.f64 1 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(*.f64 2 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(*.f64 (cos.f64 0) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(*.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)
(*.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 1/2)
(*.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -1/2)
(/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(/.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)
(/.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 2)
(/.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) -2)
(/.f64 (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2)
(/.f64 (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) 2)
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(pow.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(neg.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3))))
(+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(+.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))
(-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(-.f64 0 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(-.f64 (*.f64 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))
(*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 0))
(*.f64 1 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(*.f64 2 (/.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2))
(*.f64 (cos.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 1/2)
(/.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(/.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 2)
(/.f64 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)
(/.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2)))) 2)
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2)))) (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)
(/.f64 (-.f64 0 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))))) -2)
(/.f64 (-.f64 0 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))))) -2)
(pow.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3))))
Outputs
(cos.f64 (*.f64 1/2 (PI.f64)))
(+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1)))
(+.f64 (*.f64 -8 (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (pow.f64 lambda1 2))) (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1))))
(+.f64 (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1)) (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 -8 (pow.f64 lambda1 2)))))
(+.f64 (*.f64 -8 (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (pow.f64 lambda1 2))) (+.f64 (*.f64 -32/3 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (pow.f64 lambda1 3))) (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1)))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (*.f64 -32/3 (pow.f64 lambda1 3))) (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 -8 (pow.f64 lambda1 2)))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 4 (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) lambda1))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 -8 (pow.f64 lambda1 2))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (*.f64 -32/3 (pow.f64 lambda1 3)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 -8 (pow.f64 lambda1 2))) (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (+.f64 (*.f64 -32/3 (pow.f64 lambda1 3)) (*.f64 4 lambda1)))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 (cos.f64 (*.f64 1/2 (PI.f64))) (*.f64 -8 (pow.f64 lambda1 2)))) (*.f64 (sin.f64 (*.f64 1/2 (PI.f64))) (+.f64 (*.f64 -32/3 (pow.f64 lambda1 3)) (*.f64 4 lambda1))))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 4 lambda1)))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -4)))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -4)))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -4)))
(cos.f64 (+.f64 (*.f64 -4 lambda1) (*.f64 1/2 (PI.f64))))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 -4)))
(cos.f64 (*.f64 3 lambda1))
(cos.f64 (*.f64 lambda1 3))
(+.f64 (cos.f64 (*.f64 3 lambda1)) (*.f64 -1 (*.f64 lambda2 (sin.f64 (*.f64 3 lambda1)))))
(+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 lambda2 (*.f64 -1 (sin.f64 (*.f64 lambda1 3)))))
(+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 (sin.f64 (*.f64 lambda1 3)) (neg.f64 lambda2)))
(+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 lambda2 (neg.f64 (sin.f64 (*.f64 lambda1 3)))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 3 lambda1)))) (+.f64 (cos.f64 (*.f64 3 lambda1)) (*.f64 -1 (*.f64 lambda2 (sin.f64 (*.f64 3 lambda1))))))
(+.f64 (*.f64 lambda2 (*.f64 -1 (sin.f64 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 lambda1 3)) (pow.f64 lambda2 2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (neg.f64 lambda2)) (+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2)))))
(+.f64 (+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 lambda2 (neg.f64 (sin.f64 (*.f64 lambda1 3))))) (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2))))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (cos.f64 (*.f64 3 lambda1)))) (+.f64 (*.f64 1/6 (*.f64 (pow.f64 lambda2 3) (sin.f64 (*.f64 3 lambda1)))) (+.f64 (cos.f64 (*.f64 3 lambda1)) (*.f64 -1 (*.f64 lambda2 (sin.f64 (*.f64 3 lambda1)))))))
(+.f64 (+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 lambda2 (*.f64 -1 (sin.f64 (*.f64 lambda1 3))))) (+.f64 (*.f64 1/6 (*.f64 (sin.f64 (*.f64 lambda1 3)) (pow.f64 lambda2 3))) (*.f64 -1/2 (*.f64 (cos.f64 (*.f64 lambda1 3)) (pow.f64 lambda2 2)))))
(+.f64 (+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 (sin.f64 (*.f64 lambda1 3)) (neg.f64 lambda2))) (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2))) (*.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 1/6 (pow.f64 lambda2 3)))))
(+.f64 (cos.f64 (*.f64 lambda1 3)) (+.f64 (*.f64 lambda2 (neg.f64 (sin.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2))) (*.f64 1/6 (*.f64 (sin.f64 (*.f64 lambda1 3)) (pow.f64 lambda2 3))))))
(+.f64 (+.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2)))) (*.f64 (sin.f64 (*.f64 lambda1 3)) (+.f64 (*.f64 1/6 (pow.f64 lambda2 3)) (neg.f64 lambda2))))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(cos.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(cos.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(cos.f64 lambda2)
(+.f64 (cos.f64 lambda2) (*.f64 -3 (*.f64 (sin.f64 lambda2) lambda1)))
(+.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (*.f64 lambda1 -3)))
(+.f64 (cos.f64 lambda2) (*.f64 lambda1 (*.f64 -3 (sin.f64 lambda2))))
(+.f64 (*.f64 -9/2 (*.f64 (cos.f64 lambda2) (pow.f64 lambda1 2))) (+.f64 (cos.f64 lambda2) (*.f64 -3 (*.f64 (sin.f64 lambda2) lambda1))))
(+.f64 (*.f64 (sin.f64 lambda2) (*.f64 lambda1 -3)) (+.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 -9/2 (pow.f64 lambda1 2)))))
(+.f64 (cos.f64 lambda2) (+.f64 (*.f64 (sin.f64 lambda2) (*.f64 lambda1 -3)) (*.f64 (pow.f64 lambda1 2) (*.f64 -9/2 (cos.f64 lambda2)))))
(+.f64 (cos.f64 lambda2) (+.f64 (*.f64 lambda1 (*.f64 -3 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 2) -9/2))))
(+.f64 (cos.f64 lambda2) (+.f64 (*.f64 (sin.f64 lambda2) (*.f64 lambda1 -3)) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 lambda2) -9/2))))
(+.f64 (*.f64 -9/2 (*.f64 (cos.f64 lambda2) (pow.f64 lambda1 2))) (+.f64 (*.f64 9/2 (*.f64 (sin.f64 lambda2) (pow.f64 lambda1 3))) (+.f64 (cos.f64 lambda2) (*.f64 -3 (*.f64 (sin.f64 lambda2) lambda1)))))
(+.f64 (+.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (*.f64 lambda1 -3))) (+.f64 (*.f64 (sin.f64 lambda2) (*.f64 9/2 (pow.f64 lambda1 3))) (*.f64 (cos.f64 lambda2) (*.f64 -9/2 (pow.f64 lambda1 2)))))
(+.f64 (+.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (*.f64 lambda1 -3))) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 -9/2 (cos.f64 lambda2))) (*.f64 (pow.f64 lambda1 3) (*.f64 9/2 (sin.f64 lambda2)))))
(+.f64 (+.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 2) -9/2))) (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 (pow.f64 lambda1 3) 9/2) (*.f64 lambda1 -3))))
(+.f64 (+.f64 (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 lambda2) -9/2))) (*.f64 (sin.f64 lambda2) (+.f64 (*.f64 (pow.f64 lambda1 3) 9/2) (*.f64 lambda1 -3))))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(cos.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(cos.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(sin.f64 (*.f64 3 lambda1))
(sin.f64 (*.f64 lambda1 3))
(+.f64 (sin.f64 (*.f64 3 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 3 lambda1))))
(+.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2))
(+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 3 lambda1)))) (+.f64 (sin.f64 (*.f64 3 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 3 lambda1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2) (+.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 (pow.f64 lambda2 2) (*.f64 -1/2 (sin.f64 (*.f64 lambda1 3))))))
(+.f64 (sin.f64 (*.f64 lambda1 3)) (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2) (*.f64 (pow.f64 lambda2 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) -1/2))))
(+.f64 (sin.f64 (*.f64 lambda1 3)) (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2)))))
(+.f64 (*.f64 -1/6 (*.f64 (pow.f64 lambda2 3) (cos.f64 (*.f64 3 lambda1)))) (+.f64 (*.f64 -1/2 (*.f64 (pow.f64 lambda2 2) (sin.f64 (*.f64 3 lambda1)))) (+.f64 (sin.f64 (*.f64 3 lambda1)) (*.f64 lambda2 (cos.f64 (*.f64 3 lambda1))))))
(+.f64 (+.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2)) (+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 -1/2 (sin.f64 (*.f64 lambda1 3)))) (*.f64 (pow.f64 lambda2 3) (*.f64 -1/6 (cos.f64 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (pow.f64 lambda2 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) -1/2)) (+.f64 (+.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 -1/6 (pow.f64 lambda2 3)))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2))) (+.f64 (+.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 (cos.f64 (*.f64 lambda1 3)) lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 3)) (*.f64 (pow.f64 lambda2 3) -1/6))))
(+.f64 (+.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 (sin.f64 (*.f64 lambda1 3)) (*.f64 -1/2 (pow.f64 lambda2 2)))) (*.f64 (cos.f64 (*.f64 lambda1 3)) (+.f64 (*.f64 (pow.f64 lambda2 3) -1/6) lambda2)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(sin.f64 (-.f64 (*.f64 3 lambda1) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (*.f64 -1 lambda2)))
(sin.f64 (-.f64 (*.f64 lambda1 3) (neg.f64 lambda2)))
(sin.f64 lambda2)
(+.f64 (*.f64 3 (*.f64 (cos.f64 lambda2) lambda1)) (sin.f64 lambda2))
(+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 3)))
(+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) 3)))
(+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 3 (cos.f64 lambda2))))
(+.f64 (*.f64 3 (*.f64 (cos.f64 lambda2) lambda1)) (+.f64 (sin.f64 lambda2) (*.f64 -9/2 (*.f64 (sin.f64 lambda2) (pow.f64 lambda1 2)))))
(+.f64 (*.f64 (sin.f64 lambda2) (*.f64 -9/2 (pow.f64 lambda1 2))) (+.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (*.f64 lambda1 3))))
(+.f64 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) 3))) (*.f64 (pow.f64 lambda1 2) (*.f64 -9/2 (sin.f64 lambda2))))
(+.f64 (*.f64 lambda1 (*.f64 3 (cos.f64 lambda2))) (+.f64 (sin.f64 lambda2) (*.f64 (pow.f64 lambda1 2) (*.f64 (sin.f64 lambda2) -9/2))))
(+.f64 (sin.f64 lambda2) (+.f64 (*.f64 lambda1 (*.f64 3 (cos.f64 lambda2))) (*.f64 (pow.f64 lambda1 2) (*.f64 (sin.f64 lambda2) -9/2))))
(+.f64 (*.f64 -9/2 (*.f64 (cos.f64 lambda2) (pow.f64 lambda1 3))) (+.f64 (*.f64 3 (*.f64 (cos.f64 lambda2) lambda1)) (+.f64 (sin.f64 lambda2) (*.f64 -9/2 (*.f64 (sin.f64 lambda2) (pow.f64 lambda1 2))))))
(+.f64 (+.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda2) (*.f64 -9/2 (pow.f64 lambda1 2)))) (+.f64 (*.f64 (cos.f64 lambda2) (*.f64 lambda1 3)) (*.f64 (cos.f64 lambda2) (*.f64 -9/2 (pow.f64 lambda1 3)))))
(+.f64 (+.f64 (sin.f64 lambda2) (*.f64 lambda1 (*.f64 (cos.f64 lambda2) 3))) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 -9/2 (sin.f64 lambda2))) (*.f64 (pow.f64 lambda1 3) (*.f64 -9/2 (cos.f64 lambda2)))))
(+.f64 (sin.f64 lambda2) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (sin.f64 lambda2) -9/2)) (*.f64 (cos.f64 lambda2) (+.f64 (*.f64 lambda1 3) (*.f64 (pow.f64 lambda1 3) -9/2)))))
(+.f64 (sin.f64 lambda2) (+.f64 (*.f64 (pow.f64 lambda1 2) (*.f64 (sin.f64 lambda2) -9/2)) (*.f64 (cos.f64 lambda2) (+.f64 (*.f64 (pow.f64 lambda1 3) -9/2) (*.f64 lambda1 3)))))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (+.f64 lambda2 (*.f64 3 lambda1)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(sin.f64 (-.f64 lambda2 (*.f64 -3 lambda1)))
(sin.f64 (-.f64 lambda2 (*.f64 lambda1 -3)))
(+.f64 (sin.f64 (*.f64 lambda1 4)) 0)
(sin.f64 (*.f64 4 lambda1))
(+.f64 0 (sin.f64 (*.f64 lambda1 4)))
(sin.f64 (*.f64 4 lambda1))
(+.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 (sin.f64 (*.f64 lambda1 4)) 2))
(+.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 2 (sin.f64 (*.f64 4 lambda1))))
(-.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 (sin.f64 (*.f64 4 lambda1)) -2))
(-.f64 (sin.f64 (*.f64 lambda1 4)) 0)
(sin.f64 (*.f64 4 lambda1))
(-.f64 0 (sin.f64 (*.f64 lambda1 -4)))
(neg.f64 (sin.f64 (*.f64 lambda1 -4)))
(-.f64 0 (/.f64 (sin.f64 (*.f64 lambda1 4)) -1))
(sin.f64 (*.f64 4 lambda1))
(-.f64 0 (/.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) -2))
(sin.f64 (*.f64 4 lambda1))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (sin.f64 (*.f64 lambda1 4)))
(sin.f64 (*.f64 4 lambda1))
(-.f64 (sin.f64 (*.f64 lambda1 -4)) (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)))
(+.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 2 (sin.f64 (*.f64 4 lambda1))))
(-.f64 (sin.f64 (*.f64 lambda1 -4)) (*.f64 (sin.f64 (*.f64 4 lambda1)) -2))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)) (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) (sin.f64 (*.f64 lambda1 4))))
(sin.f64 (*.f64 4 lambda1))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 8 (neg.f64 lambda1)))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (*.f64 lambda1 4))) (sin.f64 (*.f64 8 (neg.f64 lambda1)))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 8 (neg.f64 lambda1)))) (*.f64 (sin.f64 (+.f64 (*.f64 4 lambda1) (/.f64 (PI.f64) 2))) (sin.f64 (*.f64 8 (neg.f64 lambda1)))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 lambda1 -8))) (*.f64 (sin.f64 (+.f64 (*.f64 4 lambda1) (/.f64 (PI.f64) 2))) (sin.f64 (*.f64 lambda1 -8))))
(*.f64 (sin.f64 (*.f64 lambda1 4)) 1)
(sin.f64 (*.f64 4 lambda1))
(*.f64 (sin.f64 (*.f64 lambda1 4)) (cos.f64 0))
(sin.f64 (*.f64 4 lambda1))
(*.f64 (sin.f64 (*.f64 lambda1 4)) (*.f64 (cos.f64 0) (cos.f64 0)))
(sin.f64 (*.f64 4 lambda1))
(*.f64 (sin.f64 (*.f64 lambda1 4)) (-.f64 2 (cos.f64 0)))
(sin.f64 (*.f64 4 lambda1))
(*.f64 1 (sin.f64 (*.f64 lambda1 4)))
(sin.f64 (*.f64 4 lambda1))
(*.f64 2 (*.f64 (sin.f64 (*.f64 lambda1 4)) 1/2))
(sin.f64 (*.f64 4 lambda1))
(*.f64 (cos.f64 0) (sin.f64 (*.f64 lambda1 4)))
(sin.f64 (*.f64 4 lambda1))
(*.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) 1/2)
(sin.f64 (*.f64 4 lambda1))
(/.f64 (sin.f64 (*.f64 lambda1 4)) 1)
(sin.f64 (*.f64 4 lambda1))
(/.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2) 2)
(sin.f64 (*.f64 4 lambda1))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 4)) 2)) -2)
(sin.f64 (*.f64 4 lambda1))
(/.f64 (+.f64 (sin.f64 (*.f64 lambda1 4)) (cos.f64 (+.f64 (*.f64 lambda1 4) (*.f64 (PI.f64) -1/2)))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 4 lambda1)) (cos.f64 (+.f64 (*.f64 4 lambda1) (*.f64 (PI.f64) -1/2)))) 2)
(/.f64 (sin.f64 (*.f64 lambda1 -4)) -1)
(neg.f64 (sin.f64 (*.f64 lambda1 -4)))
(pow.f64 (sin.f64 (*.f64 lambda1 4)) 1)
(sin.f64 (*.f64 4 lambda1))
(neg.f64 (sin.f64 (*.f64 lambda1 -4)))
(sin.f64 (*.f64 lambda1 4))
(sin.f64 (*.f64 4 lambda1))
(+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 0 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) 1/2)))
(+.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))))
(+.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 0 (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))
(+.f64 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 0))))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (*.f64 (cos.f64 0) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))
(+.f64 (*.f64 (cos.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2))) (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2)) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 -2 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 (*.f64 -2 (+.f64 lambda2 (*.f64 lambda1 3)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 -2 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 (*.f64 -2 (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 0 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (*.f64 (cos.f64 0) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) 1/2) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(+.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))))
(-.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) -2) (-.f64 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (-.f64 0 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (neg.f64 (sin.f64 lambda2))) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) -2))
(-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))
(-.f64 (neg.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (-.f64 (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (-.f64 (*.f64 1/2 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))))
(+.f64 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 1/2 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (/.f64 (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) (/.f64 (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (+.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))))
(-.f64 (*.f64 2 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (*.f64 2 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 0)) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(+.f64 (*.f64 (sin.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (*.f64 (cos.f64 0) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))
(-.f64 (/.f64 (*.f64 (sin.f64 lambda2) (*.f64 2 (sin.f64 (*.f64 lambda1 3)))) -1) (/.f64 (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) -1))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) 2) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) 2))
(/.f64 (-.f64 (*.f64 2 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))))) 2)
(-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2))
(-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) -2) (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))))
(-.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) 2))
(-.f64 (/.f64 (*.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2) -2) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) -2))
(/.f64 (-.f64 (*.f64 2 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))))) -2)
(-.f64 (*.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) -2))
(-.f64 (neg.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) -2))
(-.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) -2))
(-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) 2) (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))))) (+.f64 (*.f64 2 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3)))) (+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))))
(-.f64 (+.f64 (*.f64 2 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2))) (*.f64 2 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)))) (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (*.f64 2 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2))))))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) 4) (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 2 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2))))))
(-.f64 (*.f64 4 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2))) (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 (*.f64 lambda1 3)) (+.f64 (cos.f64 lambda2) (*.f64 2 (cos.f64 lambda2))))))
(-.f64 (+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) (+.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 0))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (*.f64 (cos.f64 0) (cos.f64 0)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 2 (cos.f64 0)))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 1 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 2 (*.f64 1/2 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (cos.f64 0) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 1/2)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -1/2)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 2)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) -2)
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (/.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2))
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) -2)
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (neg.f64 (sin.f64 lambda2))) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) -2))
(-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))
(/.f64 (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2)
(-.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (/.f64 (neg.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (neg.f64 (sin.f64 lambda2))) (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) -2))
(-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))
(/.f64 (+.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 lambda1 3) lambda2)))) -2)
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (cos.f64 lambda2)) (/.f64 (-.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2))
(/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(pow.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(neg.f64 (neg.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3))))
(cos.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 0)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 0 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (sin.f64 0) (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 0) (sin.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(-.f64 (*.f64 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (*.f64 2 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2)) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2))))
(-.f64 (*.f64 (cos.f64 (*.f64 -2 (+.f64 lambda2 (*.f64 lambda1 3)))) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 -2 (+.f64 lambda2 (*.f64 lambda1 3))))))
(cos.f64 (+.f64 (/.f64 (PI.f64) 2) (*.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)))
(*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 0))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 1 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 2 (/.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (cos.f64 0) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 1/2)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) 2)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (-.f64 0 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) -1)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2)))) 2)
(/.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(/.f64 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2) (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(/.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (*.f64 2 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3)))))) 2)
(-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (/.f64 (-.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2))
(-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (/.f64 (-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3))))) -2))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 3)) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2)))) (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)
(/.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (*.f64 2 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3)))))) 2)
(-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (/.f64 (-.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) 2))
(-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (/.f64 (-.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3))))) -2))
(/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3))))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 3)) 2)
(/.f64 (-.f64 0 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 2)) -2)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))) (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))) (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))))) -2)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(/.f64 (-.f64 0 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 (PI.f64) -1/2))))) -2)
(/.f64 (+.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 lambda2 (*.f64 lambda1 3))))) 2)
(pow.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) 1)
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))
(cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3))))
(sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))

eval3.4s (2.3%)

Compiler

Compiled 189283 to 126289 computations (33.3% saved)

prune3.4s (2.2%)

Pruning

205 alts after pruning (205 fresh and 0 done)

PrunedKeptTotal
New2167972264
Fresh30108138
Picked101
Done404
Total22022052407
Error
11.7b
Counts
2407 → 205
Alt Table
Click to see full alt table
StatusErrorProgram
26.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
36.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
49.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
39.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
38.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
43.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
52.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
36.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
51.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
32.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
47.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
44.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
38.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
51.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
39.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
52.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
50.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
51.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
48.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
45.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
23.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
50.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
35.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
35.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
39.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
26.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
28.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
27.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
37.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
27.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
37.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
27.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
27.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
13.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
33.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
13.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
28.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
14.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
26.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
26.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
31.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
41.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
39.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
25.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
31.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
42.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
31.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
35.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
31.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
42.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
36.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
44.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
50.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
39.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
48.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
49.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
53.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
46.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
51.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
34.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
25.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
33.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
42.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
31.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
42.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
33.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
31.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
35.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
32.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
34.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 lambda1 -8))) (*.f64 (sin.f64 (+.f64 (*.f64 4 lambda1) (/.f64 (PI.f64) 2))) (sin.f64 (*.f64 lambda1 -8))))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
42.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (/.f64 (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2))) (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2)) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
42.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
42.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
42.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
46.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
34.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
25.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
38.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
46.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
46.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
38.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
44.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
38.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
38.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
38.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
46.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
46.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
38.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
39.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
44.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
38.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
38.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
47.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
44.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
37.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
41.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
52.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
46.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Compiler

Compiled 30776 to 23118 computations (24.9% saved)

localize270.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.5b
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))
1.5b
(-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
2.7b
(cos.f64 (-.f64 lambda1 lambda2))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
Compiler

Compiled 662 to 425 computations (35.8% saved)

series7.0ms (0%)

Counts
2 → 72
Calls

18 calls:

TimeVariablePointExpression
1.0ms
lambda1
@-inf
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))
0.0ms
lambda2
@0
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))
0.0ms
lambda1
@0
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))
0.0ms
phi1
@0
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))
0.0ms
phi2
@0
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))

rewrite67.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
2040×rational_best-1
2036×rational_best-4
2036×rational_best-2
2036×rational_best-3
2032×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
031142
1210142
2384142
3805142
41738142
54890142
Stop Event
node limit
Counts
2 → 18
Calls
Call 1
Inputs
(-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2))
(+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1/2 (neg.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))))))
((#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)))))

simplify171.0ms (0.1%)

Algorithm
egg-herbie
Rules
1184×rational_best-simplify-49
1076×rational_best-simplify-2
1036×rational_best-simplify-1
1000×rational_best-simplify-46
980×rational_best-simplify-43
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
02478564
15758466
210858378
319908266
432418154
546548134
Stop Event
node limit
Counts
90 → 158
Calls
Call 1
Inputs
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))))) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))))) 1)
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))))) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))))))) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))))))) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(+.f64 1/2 (neg.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 0)
(+.f64 0 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(+.f64 (neg.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1/2)
(*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)
(*.f64 -1 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))
(*.f64 1 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2) -1)
(/.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)
(/.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2) -1)
(pow.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)
(neg.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 0)
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) 1)
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)
(*.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)
(pow.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)
Outputs
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (pow.f64 lambda1 3))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/12 (pow.f64 lambda1 3))) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/12 (pow.f64 lambda1 3)))) (+.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/12 (pow.f64 lambda1 3)) (*.f64 1/2 lambda1))) (+.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 -1/12 (pow.f64 lambda1 3)) (*.f64 1/2 lambda1))))) (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1))))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (*.f64 (sin.f64 lambda1) (*.f64 lambda2 -1/2))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (+.f64 1/2 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1)))) (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (+.f64 1/2 (*.f64 (sin.f64 lambda1) (*.f64 lambda2 -1/2))) (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (sin.f64 lambda1))) (+.f64 1/2 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (cos.f64 lambda1)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2)))) (+.f64 1/2 (*.f64 1/12 (*.f64 (sin.f64 lambda1) (pow.f64 lambda2 3))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (+.f64 1/2 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1)))) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (sin.f64 lambda1) (*.f64 1/12 (pow.f64 lambda2 3))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (+.f64 (+.f64 1/2 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1)))) (*.f64 (sin.f64 lambda1) (*.f64 1/12 (pow.f64 lambda2 3))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 1/12 (pow.f64 lambda2 3)) (*.f64 lambda2 -1/2))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 1/2 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 lambda2 -1/2) (*.f64 1/12 (pow.f64 lambda2 3)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (+.f64 1/2 (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 lambda2 -1/2) (*.f64 1/12 (pow.f64 lambda2 3)))))) (*.f64 1/2 (cos.f64 lambda1)))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))) -1)
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2))))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))))
(+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) -1))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))))
(+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) -1))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2)))))))) -1)
(+.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))))))
(+.f64 -1 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi2))))))))))
(+.f64 -1 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2)))))))))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (+.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3)))) -1)
(+.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))))))
(+.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (+.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6))))))
(+.f64 -1 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi2))) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6))))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi2))))))) (+.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))) -1))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) -1)
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))))
(+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))))
(+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 -1 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) -1)
(+.f64 -1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (neg.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))))))
(+.f64 -1 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1)))))))
(+.f64 -1 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))))) -1)
(+.f64 -1 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (neg.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))))))
(+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1))
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)) -1))
(+.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)) -1))
(-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))))) 1)
(+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))))) -1)
(+.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3)) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (neg.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))))))
(+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (neg.f64 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)))) (+.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (*.f64 (pow.f64 phi2 3) 1/6))) -1))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) 1/6)) (pow.f64 phi2 3)))))))
(+.f64 -1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 (pow.f64 phi2 3) 1/6) (neg.f64 phi2)))))))
(+.f64 -1 (+.f64 (*.f64 (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 -1/2 (cos.f64 phi1))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))) (pow.f64 phi2 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 (*.f64 (pow.f64 phi2 3) 1/6) (neg.f64 phi2)))))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))))) 1)
(+.f64 (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (cos.f64 phi1)) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))))
(+.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2)))))))) 1)
(+.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)))))))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1))) (*.f64 1/4 (cos.f64 phi2)))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 2) (*.f64 1/4 (cos.f64 phi1))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (cos.f64 phi1)) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 1/2 lambda1)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))) (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/12 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (neg.f64 lambda2)) (pow.f64 lambda1 2))))))))) 1)
(+.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/12 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 3) (cos.f64 phi1))))))))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) (cos.f64 phi1))) (*.f64 1/4 (cos.f64 phi2))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 lambda1 (cos.f64 phi1))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 -1/12 (*.f64 (pow.f64 lambda1 3) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda1 3) (*.f64 -1/12 (cos.f64 phi1)))) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (*.f64 1/2 (cos.f64 phi1)))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))) (cos.f64 phi1)) (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (pow.f64 lambda1 2) (*.f64 1/4 (cos.f64 phi1)))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/2 lambda1)) (*.f64 -1/12 (*.f64 (pow.f64 lambda1 3) (cos.f64 phi1)))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/12 (pow.f64 lambda1 3)) (*.f64 1/2 lambda1))))))))
(+.f64 (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2)))))) (*.f64 (sin.f64 (neg.f64 lambda2)) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/12 (pow.f64 lambda1 3)) (*.f64 1/2 lambda1)))))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))) (cos.f64 phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))) (cos.f64 phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))) (cos.f64 phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)))
(-.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 (*.f64 -1 lambda1) lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (*.f64 lambda1 -1)))))) (cos.f64 phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) -1))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1))) (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))))))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 -1/2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 lambda2 (cos.f64 phi2)))))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)) (*.f64 lambda2 (*.f64 -1/2 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)))))) -1))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (sin.f64 lambda1))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 lambda2 (*.f64 -1/2 (sin.f64 lambda1))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 lambda2 -1/2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 lambda2 (cos.f64 phi2)))) (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 lambda2 (cos.f64 phi2)))))) -1))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) (cos.f64 phi1)))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)) (*.f64 (sin.f64 lambda1) (*.f64 -1/2 (*.f64 lambda2 (cos.f64 phi1)))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 -1/2 (*.f64 lambda2 (cos.f64 phi1)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 lambda2 -1/2)) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (+.f64 (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (cos.f64 lambda1))))) (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1))) (+.f64 (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))))) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))))))) -1)
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 -1/2 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (*.f64 lambda2 (cos.f64 phi2)))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1))))) (*.f64 1/12 (*.f64 (pow.f64 lambda2 3) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)) (*.f64 1/4 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 lambda1) (cos.f64 phi1)))))) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/12 (*.f64 (sin.f64 lambda1) (*.f64 (pow.f64 lambda2 3) (cos.f64 phi2))))) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 lambda2 (cos.f64 phi2)))))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi1)) (*.f64 1/4 (*.f64 (cos.f64 lambda1) (*.f64 (pow.f64 lambda2 2) (cos.f64 phi1)))))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 phi1))) (+.f64 (*.f64 lambda2 -1/2) (*.f64 1/12 (pow.f64 lambda2 3)))))))
(+.f64 -1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 lambda1) (+.f64 (*.f64 lambda2 -1/2) (*.f64 1/12 (pow.f64 lambda2 3)))))))))
(+.f64 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi1)) (+.f64 (*.f64 lambda2 -1/2) (*.f64 1/12 (pow.f64 lambda2 3)))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2)))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (*.f64 -1 lambda2) lambda1)))) (cos.f64 phi1)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 1/2 (neg.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 0)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 0 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 (neg.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1/2)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 -1 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 1 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2) -1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(pow.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) 1)
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(neg.f64 (-.f64 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))) 1/2))
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2))
(+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 0)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2)))) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(*.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(pow.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)) 1)
(+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) -1)
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (+.f64 1/2 (*.f64 -1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))

localize124.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
1.2b
(-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))
1.5b
(-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))
2.7b
(cos.f64 (-.f64 lambda1 lambda2))
5.5b
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
Compiler

Compiled 326 to 204 computations (37.4% saved)

series12.0ms (0%)

Counts
1 → 36
Calls

9 calls:

TimeVariablePointExpression
2.0ms
phi2
@-inf
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
2.0ms
phi1
@0
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
2.0ms
phi2
@0
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
1.0ms
phi2
@inf
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
1.0ms
phi1
@inf
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))

rewrite77.0ms (0.1%)

Algorithm
batch-egg-rewrite
Rules
1898×rational_best-2
1898×rational_best-3
1898×rational_best-1
844×rational_best-4
840×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02163
113963
224163
342063
495563
5241163
6688063
Stop Event
node limit
Counts
1 → 7
Calls
Call 1
Inputs
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)))))

simplify177.0ms (0.1%)

Algorithm
egg-herbie
Rules
1502×rational_best-simplify-49
1494×rational_best-simplify-46
1404×rational_best-simplify-47
1080×rational_best-simplify-53
1038×rational_best-simplify-2
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
01455093
12985075
25054991
38534831
413494699
519664685
624684685
736474685
879024685
Stop Event
node limit
Counts
43 → 80
Calls
Call 1
Inputs
(sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))) (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))) (+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1/1440 (*.f64 -1/720 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (pow.f64 phi2 6)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (pow.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (pow.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (*.f64 -1/720 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 -1/4 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (pow.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))) (pow.f64 phi1 6)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sin.f64 (*.f64 -1/2 phi2))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (sin.f64 (*.f64 -1/2 phi2)))) (sin.f64 (*.f64 -1/2 phi2)))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 -1/48 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) (pow.f64 lambda1 4)) (sin.f64 (*.f64 -1/2 phi2)))) (sin.f64 (*.f64 -1/2 phi2))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/1440 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 -1/48 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))) (pow.f64 lambda1 6)) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 -1/48 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) (pow.f64 lambda1 4)) (sin.f64 (*.f64 -1/2 phi2)))) (sin.f64 (*.f64 -1/2 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 0)
(+.f64 0 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 0)
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)
(*.f64 1 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)
Outputs
(sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (*.f64 1/2 (pow.f64 phi2 2))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))) (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 1/24 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))) (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 1/2 (+.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))) (+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (*.f64 (*.f64 (-.f64 (+.f64 1/1440 (*.f64 -1/720 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 1/2 (/.f64 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (pow.f64 phi2 6)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (+.f64 (*.f64 (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) -1/720)) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 1/24 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (pow.f64 phi2 6)) (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 1/24 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 -1/2 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))))))
(+.f64 (+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/720 (cos.f64 phi1)))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 6))))) (*.f64 1/2 (+.f64 (*.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (+.f64 (*.f64 1/2 (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) -1/720))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 6)))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 1/2 (+.f64 (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (+.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))))) (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) -1/720))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (pow.f64 phi2 6))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 (+.f64 (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/720))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (pow.f64 phi2 6))) (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (*.f64 1/2 (+.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (+.f64 (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/720))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (pow.f64 phi2 6)))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/720))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (pow.f64 phi2 6)) (+.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)))))))
(+.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (pow.f64 phi2 2)) (+.f64 (*.f64 (pow.f64 phi2 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48))) (*.f64 (-.f64 (+.f64 1/1440 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/720))) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (cos.f64 phi1) 1/24)) (+.f64 (pow.f64 (*.f64 1/2 (*.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (sqrt.f64 (/.f64 1 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) 2) 1/48)) (/.f64 (+.f64 1/4 (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/2))) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))) (pow.f64 phi2 6))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))
(+.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 -1/4 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 -1/4 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (pow.f64 phi1 2) (cos.f64 phi2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (pow.f64 phi1 2)))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4)))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 -1/4 (*.f64 (pow.f64 phi1 2) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (pow.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) (*.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 1/24 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) 2))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))))
(+.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 -1/4 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (pow.f64 phi1 2) (cos.f64 phi2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 -1/4 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) 2))))))
(+.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (pow.f64 phi1 2))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 -1/4 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 2))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (*.f64 1/2 (pow.f64 phi1 4))) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (pow.f64 phi1 2)))) (*.f64 (pow.f64 phi1 4) (*.f64 1/2 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (pow.f64 phi1 2)))) (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (*.f64 1/2 (pow.f64 phi1 4))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (pow.f64 phi1 2)))) (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))) 2)) (*.f64 1/2 (pow.f64 phi1 4))))))
(+.f64 (*.f64 1/2 (*.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (pow.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) 2))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 phi1 2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (-.f64 (*.f64 -1/720 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (*.f64 -1/4 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (-.f64 (*.f64 1/24 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (pow.f64 (*.f64 -1/4 (*.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) 2)))) (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))) (pow.f64 phi1 6)) (sqrt.f64 (/.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (sqrt.f64 (+.f64 (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))))
(+.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (*.f64 (-.f64 (*.f64 -1/720 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 -1/4 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (-.f64 (*.f64 1/24 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) 2))) (/.f64 (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) (pow.f64 phi1 6)) (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) (*.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 1/24 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)) (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) 2))) (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))))
(+.f64 (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 -1/4 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) 2))))) (+.f64 (*.f64 -1/4 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (pow.f64 phi1 2) (cos.f64 phi2))) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 (*.f64 -1/720 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 -1/4 (/.f64 (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 -1/4 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) 2)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))) (pow.f64 phi1 6)))))))
(+.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 -1/4 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (pow.f64 phi1 2))))) (+.f64 (*.f64 (-.f64 (*.f64 -1/720 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))) (*.f64 -1/4 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 (/.f64 (cos.f64 phi2) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 -1/4 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 2)))))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (pow.f64 phi1 6)))) (*.f64 1/2 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 -1/4 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 2)))))))
(+.f64 (+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (pow.f64 phi1 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))))) (*.f64 (*.f64 1/2 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))) (+.f64 (*.f64 (pow.f64 phi1 4) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2))) (*.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/720) (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (cos.f64 phi2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (*.f64 -1/4 (/.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))) (pow.f64 phi1 6)))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 1/2 (*.f64 (*.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 -1/720 (*.f64 -1/4 (/.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))))) (pow.f64 phi1 6))) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (pow.f64 phi1 2)))) (*.f64 (pow.f64 phi1 4) (*.f64 1/2 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (pow.f64 phi1 4) (*.f64 1/2 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (pow.f64 phi1 2))) (*.f64 (*.f64 1/2 (pow.f64 phi1 6)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (-.f64 -1/720 (*.f64 -1/4 (/.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (*.f64 1/2 (pow.f64 phi1 4))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (pow.f64 phi1 2))) (*.f64 (*.f64 1/2 (pow.f64 phi1 6)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (-.f64 -1/720 (*.f64 -1/4 (/.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) -1/4))) 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))))))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (*.f64 (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2))))) (+.f64 (*.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))) 2)) (*.f64 1/2 (pow.f64 phi1 4))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (pow.f64 phi1 2))) (*.f64 (*.f64 1/2 (pow.f64 phi1 6)) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (-.f64 -1/720 (*.f64 -1/4 (/.f64 (-.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 1/24 (cos.f64 phi2))) (pow.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (*.f64 -1/4 (*.f64 (cos.f64 phi2) (sqrt.f64 (/.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))) 2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sin.f64 (*.f64 -1/2 phi2))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (sin.f64 (*.f64 -1/2 phi2)))) (sin.f64 (*.f64 -1/2 phi2)))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (pow.f64 lambda1 2)))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/8 (/.f64 (pow.f64 lambda1 2) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 -1/48 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) (pow.f64 lambda1 4)) (sin.f64 (*.f64 -1/2 phi2)))) (sin.f64 (*.f64 -1/2 phi2))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 lambda1 4) (/.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/48 (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/48 (cos.f64 phi2))) (pow.f64 (*.f64 1/8 (*.f64 (cos.f64 phi2) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) 2)) (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 1/8 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (cos.f64 phi2))) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (pow.f64 lambda1 2))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 (cos.f64 phi1) 1/8)) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/8 (/.f64 (pow.f64 lambda1 2) (sin.f64 (*.f64 -1/2 phi2)))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2)))))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 1/1440 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 -1/48 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))) (pow.f64 lambda1 6)) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (/.f64 (*.f64 (-.f64 (*.f64 -1/48 (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) (pow.f64 lambda1 4)) (sin.f64 (*.f64 -1/2 phi2)))) (sin.f64 (*.f64 -1/2 phi2)))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (*.f64 (pow.f64 lambda1 4) (/.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/48 (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) 2)) (sin.f64 (*.f64 -1/2 phi2)))))) (+.f64 (*.f64 1/2 (*.f64 (pow.f64 lambda1 6) (/.f64 (-.f64 (*.f64 (cos.f64 phi2) (*.f64 1/1440 (cos.f64 phi1))) (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi2) (*.f64 -1/48 (cos.f64 phi1))) (pow.f64 (*.f64 1/8 (/.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) 2))) (/.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))) (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 1/2 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 1/1440 (cos.f64 phi2))) (*.f64 1/8 (*.f64 (cos.f64 phi2) (/.f64 (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/48 (cos.f64 phi2))) (pow.f64 (*.f64 1/8 (*.f64 (cos.f64 phi2) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) 2))) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))) (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/48 (cos.f64 phi2))) (pow.f64 (*.f64 1/8 (*.f64 (cos.f64 phi2) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) 2)) (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2))))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/2 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 1/8 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) 2)) (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 1/1440 (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 1/8 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 1/8 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) 2)) (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2)))))) (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2)))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 1/8 (*.f64 (*.f64 (cos.f64 phi2) (pow.f64 lambda1 2)) (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 1/2 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (cos.f64 phi2))) 2)) (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 phi1) 1/1440) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (cos.f64 phi2))) 2)) (*.f64 1/8 (/.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))) (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2))))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (pow.f64 lambda1 2)))) (*.f64 1/2 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 (cos.f64 phi1) 1/8)) 2)) (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 (cos.f64 phi1) (-.f64 1/1440 (*.f64 1/8 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 (cos.f64 phi1) 1/8)) 2)) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))))))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 (cos.f64 phi1) 1/8)) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/8 (/.f64 (pow.f64 lambda1 2) (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 (*.f64 1/2 (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 phi1) (-.f64 1/1440 (*.f64 1/8 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 (cos.f64 phi1) 1/8)) 2)) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))))))
(+.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2)))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/8 (/.f64 (pow.f64 lambda1 2) (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 (*.f64 1/2 (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 phi1) (-.f64 1/1440 (*.f64 1/8 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))) 2)) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)))))))))
(+.f64 (sin.f64 (*.f64 -1/2 phi2)) (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))) 2)) (*.f64 1/2 (/.f64 (pow.f64 lambda1 4) (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (/.f64 (cos.f64 phi1) (sin.f64 (*.f64 -1/2 phi2))) (*.f64 1/8 (pow.f64 lambda1 2))) (*.f64 (*.f64 1/2 (/.f64 (pow.f64 lambda1 6) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 phi1) (-.f64 1/1440 (*.f64 1/8 (/.f64 (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) -1/48)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))) 2)) (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2))))))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))))
(+.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 0)
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
(+.f64 0 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
(-.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 0)
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
(*.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
(*.f64 1 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))))
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))
(pow.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) 1)
(sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))

localize151.0ms (0.1%)

Local error

Found 4 expressions with local error:

NewErrorProgram
1.5b
(-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
17.5b
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
Compiler

Compiled 384 to 208 computations (45.8% saved)

series2.0ms (0%)

Counts
1 → 24
Calls

6 calls:

TimeVariablePointExpression
0.0ms
phi2
@0
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
0.0ms
phi1
@0
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
0.0ms
phi2
@inf
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
0.0ms
phi2
@-inf
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
0.0ms
phi1
@inf
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))

rewrite72.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1170×rational_best-2
1170×rational_best-1
1166×rational_best-3
1164×rational_best-4
1162×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01225
17625
212225
320025
437925
579625
6184325
7560525
Stop Event
node limit
Counts
1 → 62
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (sin.f64 (*.f64 (PI.f64) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 2 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (*.f64 2 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (sin.f64 (*.f64 (PI.f64) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (neg.f64 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -2 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) 1/4)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/4 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1/4 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) -1/4)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) 4)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) -4)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) -1) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))) -1) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (+.f64 (PI.f64) (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))))

simplify196.0ms (0.1%)

Algorithm
egg-herbie
Rules
1308×rational_best-simplify-2
886×rational_best-simplify-44
768×rational_best-simplify-49
684×rational_best-simplify-46
636×rational_best-simplify-51
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
01903866
13793642
29763618
327703570
459013348
574843348
Stop Event
node limit
Counts
86 → 144
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (pow.f64 phi2 2)))))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (*.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (pow.f64 phi2 3))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64))))))
(+.f64 (*.f64 -1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 0)
(+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))
(+.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))
(+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(-.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 0)
(-.f64 0 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))
(-.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))
(-.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3)))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 2 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (*.f64 2 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))))
(*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))
(*.f64 -1 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(*.f64 2 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) 1/2)
(*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) -1)
(*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) 2)
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) -1/2)
(*.f64 -2 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) -2)
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) 1/4)
(*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))
(*.f64 1/4 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4))
(*.f64 -1/4 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))
(*.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) -1/4)
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) 2)
(/.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) -1)
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) -2)
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) 4)
(/.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) -4)
(/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))) -2)
(/.f64 (/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) -1) 2)
(/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))) -1) 2)
(/.f64 (-.f64 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) -1)
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(sin.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))
(sin.f64 (+.f64 (PI.f64) (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
Outputs
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (pow.f64 phi2 2)))))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (*.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (pow.f64 phi2 3))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (pow.f64 phi2 2))))))
(+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 1/48 (pow.f64 phi2 3))))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 1/48 (pow.f64 phi2 3)))) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) phi2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 1/48 (pow.f64 phi2 3))))))
(+.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) (+.f64 (*.f64 -1/2 phi2) (*.f64 1/48 (pow.f64 phi2 3))))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (*.f64 phi2 -1)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (neg.f64 phi2)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (*.f64 phi2 -1)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (neg.f64 phi2)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (*.f64 phi2 -1)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (neg.f64 phi2)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 (*.f64 -1 phi2) phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (*.f64 phi2 -1)))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 (neg.f64 phi2)))))
(cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64))))
(cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2)))
(+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 phi1)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64))))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2)))))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (pow.f64 phi1 2))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))))) (+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (*.f64 -1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (+.f64 (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (PI.f64)))))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2)))))) (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (pow.f64 phi1 2))) (*.f64 -1/48 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (pow.f64 phi1 3)))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2)))))) (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (pow.f64 phi1 2))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/48 (pow.f64 phi1 3)))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/8 (pow.f64 phi1 2)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/48 (pow.f64 phi1 3)))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/8 (pow.f64 phi1 2)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (+.f64 (*.f64 -1/48 (pow.f64 phi1 3)) (*.f64 1/2 phi1))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (*.f64 -1/8 (pow.f64 phi1 2))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) (+.f64 (*.f64 -1/48 (pow.f64 phi1 3)) (*.f64 1/2 phi1)))))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 phi2 (PI.f64)) phi1)))
(cos.f64 (*.f64 1/2 (-.f64 (+.f64 (PI.f64) phi2) phi1)))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (+.f64 (PI.f64) phi2) (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (+.f64 (PI.f64) phi2) (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (+.f64 (PI.f64) phi2) (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 (*.f64 -1 phi1) (+.f64 phi2 (PI.f64)))))
(cos.f64 (*.f64 1/2 (+.f64 (+.f64 (PI.f64) phi2) (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi2 (neg.f64 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 0)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))
(+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(+.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 4) (*.f64 3 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 4) (*.f64 3 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 4) (*.f64 3 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 4) (*.f64 3 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 4) (*.f64 3 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 4) (*.f64 3 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1))))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))
(+.f64 (*.f64 3 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 5))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 5))
(+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))
(+.f64 (*.f64 3 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (+.f64 (*.f64 2 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 5))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) 5))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (cos.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (cos.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))))
(cos.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (cos.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (cos.f64 (neg.f64 (+.f64 (-.f64 (PI.f64) phi1) phi2)))))
(cos.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 0)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 0 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))
(-.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2))
(-.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2))
(-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2))
(-.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(*.f64 1/2 (-.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(*.f64 1/2 (-.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2))))
(*.f64 1/2 (-.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2) (*.f64 3 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2) (*.f64 3 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2) (*.f64 3 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3)))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2) (*.f64 3 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2) (*.f64 3 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) 4) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) -2) (*.f64 3 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3)))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (-.f64 (PI.f64) phi1)) -1/2)) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(cos.f64 (+.f64 (*.f64 (PI.f64) -1/2) (+.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (/.f64 (PI.f64) 2))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 2 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (*.f64 2 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 -1/2 (*.f64 2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (*.f64 -1/2 (*.f64 2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (*.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))) -1))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (*.f64 (neg.f64 (+.f64 phi2 (neg.f64 phi1))) -1))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (+.f64 phi2 (neg.f64 phi1)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) (sin.f64 (+.f64 phi2 (neg.f64 phi1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (*.f64 (PI.f64) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) -1/2)) (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) -1/2)) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 (PI.f64) -1/2))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1)))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3)) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 3/2) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 -1 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(*.f64 2 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) 1/2)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) -1)
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) 2)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) -1/2)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 -2 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) -2)
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) 1/4)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 -1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 1/4 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4))
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(*.f64 -1/4 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) -1/4)
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) 2)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(/.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) -1)
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) -2) -2)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 4) 4)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(/.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4) -4)
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) -2)
(/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (neg.f64 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (neg.f64 (PI.f64))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2)
(/.f64 (/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))) -1) 2)
(/.f64 (-.f64 (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (neg.f64 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2)
(/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1))))))) -1) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (neg.f64 (PI.f64))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2)
(/.f64 (-.f64 (*.f64 1/2 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))))) -1)
(*.f64 1/2 (-.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))))
(*.f64 1/2 (-.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2))))
(*.f64 1/2 (-.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2))) (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1))))))
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 1)
(cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))
(neg.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(neg.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))
(sin.f64 (*.f64 1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1)))))
(sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2))
(sin.f64 (*.f64 -1/2 (+.f64 phi2 (neg.f64 phi1))))
(sin.f64 (+.f64 (PI.f64) (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))))
(sin.f64 (+.f64 (PI.f64) (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)))
(sin.f64 (+.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))))

localize246.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
2.7b
(cos.f64 (-.f64 lambda1 lambda2))
2.7b
(cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1))
2.8b
(sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
3.0b
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
Compiler

Compiled 573 to 345 computations (39.8% saved)

series3.0ms (0%)

Counts
2 → 48
Calls

12 calls:

TimeVariablePointExpression
1.0ms
phi2
@0
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
0.0ms
phi1
@0
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
0.0ms
phi1
@0
(sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
0.0ms
phi2
@0
(sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
0.0ms
phi2
@-inf
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))

rewrite73.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1056×rational_best-simplify-51
970×rational_best-1
968×rational_best-4
968×rational_best-2
968×rational_best-3
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01034
17034
213434
321534
442334
5107434
6337234
Stop Event
node limit
Counts
2 → 141
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
(sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 phi1)))) 0))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 phi1))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (sin.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) 1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) -1) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (neg.f64 (PI.f64))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (neg.f64 (PI.f64))) (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (+.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2)))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) -1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1/2 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/4 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1/4 (+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) -2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x sin.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))))
((#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (*.f64 -1 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 (PI.f64) 3/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 -1 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (neg.f64 (PI.f64))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (cos.f64 (neg.f64 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))) (*.f64 (sin.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 0 (*.f64 -1 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 3) 2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 3) -1) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 -1 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 0 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) 2) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -2) (/.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) -2))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) -1))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64))))) (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 0 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (neg.f64 (PI.f64))))) (*.f64 1 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (neg.f64 (PI.f64))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 (PI.f64) -1/2)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 (PI.f64) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (cos.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (PI.f64))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (sin.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (PI.f64))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (neg.f64 (*.f64 (PI.f64) 2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))))) (#(struct:change #<rule egg-rr> (2) ((x -.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 1/2)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) -1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) -1) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1))))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))))) -2)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64))))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (*.f64 -1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))))) (#(struct:change #<rule egg-rr> (2) ((x cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))))))

simplify163.0ms (0.1%)

Algorithm
egg-herbie
Rules
1276×rational_best-simplify-2
880×rational_best-simplify-49
856×rational_best-simplify-1
784×rational_best-simplify-50
742×rational_best-simplify-46
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
04498851
110548701
230528429
377068381
Stop Event
node limit
Counts
189 → 319
Calls
Call 1
Inputs
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 phi1))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 phi2))
(+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 -1/48 (*.f64 (pow.f64 phi1 3) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 phi1)))) 0))
(+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(+.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(+.f64 (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 phi1))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (sin.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(-.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(-.f64 0 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(-.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(-.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (+.f64 phi2 phi1))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64))))))
(-.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))
(-.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) 1))
(-.f64 (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) -1) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) -1))
(-.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -1))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(-.f64 (*.f64 (cos.f64 (neg.f64 (PI.f64))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (neg.f64 (PI.f64))) (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 1 (+.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(*.f64 2 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 -1 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 -1 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2)))
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 1/2)
(*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) -1/2)
(*.f64 -1/2 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(*.f64 1/4 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))
(*.f64 -1/4 (+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 2)
(/.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) -2)
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(neg.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))
(sin.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))
(+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(+.f64 0 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(+.f64 0 (*.f64 -1 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))
(+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))))
(+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 (PI.f64) 3/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 -1 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) 0)
(+.f64 (*.f64 (sin.f64 (neg.f64 (PI.f64))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (cos.f64 (neg.f64 (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))
(+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))) (*.f64 (sin.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2)))))
(-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(-.f64 0 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))
(-.f64 0 (*.f64 -1 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 phi1))))))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2))
(-.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2)))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))
(-.f64 (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 3) 2))
(-.f64 (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 3) -1) -2))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(-.f64 (*.f64 -1 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 0 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) 2) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -2) (/.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) -2))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) -1))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) -1))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64))))) (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))))
(-.f64 (*.f64 0 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (neg.f64 (PI.f64))))) (*.f64 1 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (neg.f64 (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 (PI.f64) -1/2)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 (PI.f64) -1/2)))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (cos.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (PI.f64))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (sin.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (neg.f64 (*.f64 (PI.f64) 2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(*.f64 1 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 1/2)
(*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) -1)
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(/.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 2)
(/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) -1)
(/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) -2)
(/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) -2)
(/.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 2)
(/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) -1) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1))))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))))) -2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64))))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))
(cos.f64 (*.f64 -1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))
Outputs
(cos.f64 (*.f64 1/2 phi1))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2)))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2)) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi2 3) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))))))
(+.f64 (+.f64 (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3)))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3)))))
(+.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(cos.f64 (*.f64 1/2 phi2))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 phi1 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (cos.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 1/48 (*.f64 (pow.f64 phi1 3) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/2 (*.f64 phi1 (sin.f64 (*.f64 1/2 phi2)))))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 1/48 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (pow.f64 phi1 3))) (*.f64 (pow.f64 phi1 2) (*.f64 -1/8 (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/48 (pow.f64 phi1 3)))))
(+.f64 (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2)))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/48 (pow.f64 phi1 3)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(cos.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 1/2 phi1))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2)))))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi2 2) (sin.f64 (*.f64 1/2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (*.f64 -1/48 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 3))))))
(+.f64 (*.f64 -1/8 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (pow.f64 phi2 2))) (+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/48 (pow.f64 phi2 3))))))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 phi1)) phi2)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (pow.f64 phi2 3) -1/48))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))))
(+.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (+.f64 (*.f64 (pow.f64 phi2 3) -1/48) (*.f64 1/2 phi2)))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 -1 phi2))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (*.f64 phi2 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi1 (neg.f64 phi2))))
(sin.f64 (*.f64 1/2 phi2))
(+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))))
(+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 phi1 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi2))))))
(+.f64 (sin.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2)))))
(+.f64 (*.f64 -1/48 (*.f64 (pow.f64 phi1 3) (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 1/2 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 (pow.f64 phi1 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi2)))) (*.f64 (pow.f64 phi1 3) (*.f64 -1/48 (cos.f64 (*.f64 1/2 phi2))))))
(+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 -1/48 (pow.f64 phi1 3)))))
(+.f64 (sin.f64 (*.f64 1/2 phi2)) (+.f64 (*.f64 1/2 (*.f64 phi1 (cos.f64 (*.f64 1/2 phi2)))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi2)) (*.f64 -1/8 (pow.f64 phi1 2))) (*.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 (pow.f64 phi1 3) -1/48)))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 -1 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (*.f64 phi1 -1))))
(sin.f64 (*.f64 1/2 (-.f64 phi2 (neg.f64 phi1))))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 phi1)))) 0))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 0 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64)))))))
(+.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3) -1) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 0 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 0 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (neg.f64 (+.f64 phi1 phi2)) (*.f64 1/2 (PI.f64))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (neg.f64 (+.f64 phi1 phi2)) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 phi1))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (-.f64 (*.f64 -1/2 (PI.f64)) (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (cos.f64 (-.f64 (*.f64 -1/2 (PI.f64)) (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 (+.f64 phi2 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (sin.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (cos.f64 (neg.f64 (*.f64 2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (neg.f64 (*.f64 2 (+.f64 phi1 phi2)))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (cos.f64 (*.f64 (+.f64 phi1 phi2) -2))) (*.f64 (sin.f64 (*.f64 (+.f64 phi1 phi2) -2)) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64)))))))
(-.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 0 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (neg.f64 (+.f64 phi1 phi2))))
(cos.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))
(-.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (+.f64 phi2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi1 phi2))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (PI.f64)))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 0 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 0 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) 1))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 -1 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 0 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 0 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))
(-.f64 (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) -1) (/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)) -1))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -1))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4)) (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (neg.f64 (PI.f64))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (neg.f64 (PI.f64))) (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(cos.f64 (+.f64 (neg.f64 (PI.f64)) (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))) (neg.f64 (PI.f64))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cos.f64 (-.f64 (+.f64 phi1 phi2) (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi1 phi2) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 (cos.f64 (-.f64 (+.f64 phi1 phi2) (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (+.f64 phi1 phi2) (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)) (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 2 (PI.f64)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)) (*.f64 (PI.f64) -3/2)))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (+.f64 (*.f64 (PI.f64) 3/2) (*.f64 (PI.f64) -3/2))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi1 (+.f64 phi2 (PI.f64))))))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (+.f64 (*.f64 (+.f64 phi1 phi2) 3/2) (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 (cos.f64 (neg.f64 (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 -1/2 (PI.f64)) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (*.f64 -1/2 (PI.f64)) (+.f64 phi1 phi2)))))
(*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 1 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 1 (+.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 2 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 -1 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 -1 (+.f64 (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2) (/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) -2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 1/2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (*.f64 1/2 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) -1/2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 -1/2 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 1/4 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 -1/4 (+.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2) -2)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(neg.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))
(sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))
(sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))
(+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 0 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(+.f64 0 (*.f64 -1 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))))
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))
(+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (neg.f64 (+.f64 phi1 phi2)) (*.f64 1/2 (PI.f64))))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (neg.f64 (+.f64 phi1 phi2)) (*.f64 1/2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 (PI.f64) 3/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 (*.f64 (PI.f64) 3/2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 (PI.f64) 3/2))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (sin.f64 (*.f64 (PI.f64) 3/2))))
(+.f64 (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 phi2))))
(+.f64 (*.f64 -1 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) 0)
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (PI.f64))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (cos.f64 (neg.f64 (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (cos.f64 (neg.f64 (PI.f64)))))
(+.f64 (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (PI.f64)))) (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))))
(+.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64)))) (*.f64 (sin.f64 (-.f64 (+.f64 phi2 phi1) (PI.f64))) (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))))))
(+.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (+.f64 phi1 phi2) (PI.f64)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sin.f64 (-.f64 (+.f64 phi1 phi2) (PI.f64)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 (PI.f64) 2))) (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 2 (PI.f64))))) (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 2 (PI.f64))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (cos.f64 (*.f64 (PI.f64) -3/2))) (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2))) (sin.f64 (*.f64 (PI.f64) -3/2))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2)))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (+.f64 phi1 phi2))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi1 (+.f64 phi2 (PI.f64)))))))
(+.f64 (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 0)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 0 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(-.f64 0 (*.f64 -1 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 phi1))))))
(neg.f64 (*.f64 -1 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi1 phi2))))))
(neg.f64 (neg.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi1 phi2))))))
(*.f64 (sin.f64 (-.f64 (PI.f64) (*.f64 1/2 (+.f64 phi1 phi2)))) 1)
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2))
(-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 2 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2))
(-.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (/.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) 2))
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) 2)
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2)))
(-.f64 (*.f64 2 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 2 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2)))
(+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (-.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 3) 2))
(/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2)
(-.f64 (/.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) 3/2))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) -3/2) (/.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) -2))
(-.f64 (/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 3) -1) -2))
(/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2)
(-.f64 (/.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) 2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) 3/2))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) -3/2) (/.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) -2))
(-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 3))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (*.f64 -1 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) (*.f64 0 (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(-.f64 (*.f64 -1 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (*.f64 0 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (neg.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 0 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))
(-.f64 (neg.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) 0)
(neg.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (+.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64))))) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (+.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (cos.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (+.f64 phi1 phi2))))
(-.f64 (/.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 4) 2) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -2) (/.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2))) -2))
(/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) -2)
(/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))) -2)
(/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))))) -2)
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) -1))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (neg.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (neg.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64)))) -1) (/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) -1))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64)))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64))))) (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (PI.f64))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64))))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (+.f64 (cos.f64 (neg.f64 (PI.f64))) (cos.f64 (neg.f64 (PI.f64))))) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (PI.f64))))))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (neg.f64 (+.f64 phi2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (neg.f64 (+.f64 phi2 phi1))))))
(-.f64 (+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) (+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (+.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (+.f64 phi1 phi2))))) (+.f64 (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2))))))
(-.f64 (*.f64 0 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (neg.f64 (PI.f64))))) (*.f64 1 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (neg.f64 (PI.f64))))))
(-.f64 (*.f64 0 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (neg.f64 (PI.f64))))) (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (neg.f64 (PI.f64)))))
(-.f64 0 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (neg.f64 (PI.f64)))))
(neg.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (neg.f64 (PI.f64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 (PI.f64) -1/2)))) (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 (PI.f64) -1/2)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 -1/2 (PI.f64))))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 -1/2 (PI.f64))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 phi1 (+.f64 phi2 (*.f64 -1/2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi1 (+.f64 phi2 (*.f64 -1/2 (PI.f64)))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi2 phi1))) (cos.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (PI.f64))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi2 phi1) (*.f64 1/2 (PI.f64)))) (sin.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (PI.f64))))) (*.f64 (sin.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (PI.f64)))) (sin.f64 (*.f64 -1 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (PI.f64))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (sin.f64 (neg.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (PI.f64))))))
(-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (sin.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (*.f64 (PI.f64) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (neg.f64 (*.f64 (PI.f64) 2)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)) (neg.f64 (*.f64 2 (PI.f64)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)) (*.f64 (PI.f64) -2)))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (+.f64 (*.f64 (PI.f64) 3/2) (*.f64 (PI.f64) -2))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (neg.f64 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2))))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (+.f64 (*.f64 (+.f64 phi1 phi2) 3/2) (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (neg.f64 (+.f64 phi2 phi1))))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (+.f64 (neg.f64 (+.f64 phi1 phi2)) (*.f64 1/2 (PI.f64)))))
(cos.f64 (+.f64 (*.f64 -1/2 (+.f64 phi1 phi2)) (*.f64 1/2 (PI.f64))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi2 phi1)))))
(-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 phi1 phi2)))))
(-.f64 (*.f64 (cos.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))) (*.f64 (sin.f64 (-.f64 (*.f64 (PI.f64) -1/2) (+.f64 phi2 phi1))) (sin.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2)))))
(cos.f64 (+.f64 (-.f64 (*.f64 -1/2 (PI.f64)) (+.f64 phi1 phi2)) (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))) (-.f64 (*.f64 -1/2 (PI.f64)) (+.f64 phi1 phi2))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (cos.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (+.f64 phi2 phi1)) (*.f64 (PI.f64) 3/2))) (sin.f64 (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (*.f64 (PI.f64) 3/2)) (neg.f64 (+.f64 phi1 (+.f64 phi2 (PI.f64))))))
(cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 phi2)) (+.f64 (*.f64 (PI.f64) 3/2) (neg.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))
(-.f64 (*.f64 (cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (cos.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))) (*.f64 (sin.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi2 phi1) 3/2))) (sin.f64 (neg.f64 (*.f64 (+.f64 phi2 phi1) 2)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (*.f64 2 (+.f64 phi1 phi2)))))
(cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (*.f64 (+.f64 phi1 phi2) -2)))
(cos.f64 (+.f64 (*.f64 1/2 (PI.f64)) (+.f64 (*.f64 (+.f64 phi1 phi2) 3/2) (*.f64 (+.f64 phi1 phi2) -2))))
(*.f64 1/2 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 1 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 2 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))))
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 1/2)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) -1)
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(*.f64 (*.f64 1/2 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) 2)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 2) 2)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(/.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) -1)
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(/.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) 2) -2)
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2)
(/.f64 (-.f64 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) -2)
(/.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -1) 2)
(/.f64 (-.f64 (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -2)
(/.f64 (-.f64 (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) -2)
(/.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)) (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2))) -1) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))))) -2)
(/.f64 (+.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (cos.f64 (*.f64 -1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) -2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1))))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (+.f64 phi1 phi2))))))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (+.f64 phi1 phi2))))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (+.f64 phi1 phi2)))))) 2)
(/.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))))) (-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (PI.f64)))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (PI.f64)))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (+.f64 phi2 phi1)))))) -2)
(/.f64 (-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (+.f64 phi1 phi2))))))) 2)
(/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (+.f64 phi1 phi2))))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (+.f64 phi1 phi2)))))) 2)
(/.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64))))))) (-.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (+.f64 phi1 phi2) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))) 2)
(/.f64 (-.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64))))) (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))))) 2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2))) (neg.f64 (PI.f64)))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (PI.f64)))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 phi1 (+.f64 phi2 (PI.f64)))) (neg.f64 (PI.f64)))))) -2)
(/.f64 (-.f64 (-.f64 (cos.f64 (+.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))) (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (cos.f64 (+.f64 (PI.f64) (*.f64 1/2 (+.f64 phi2 (+.f64 phi1 (PI.f64)))))))) -2)
(pow.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) 1)
(sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))
(neg.f64 (sin.f64 (*.f64 (+.f64 phi2 phi1) -1/2)))
(neg.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))
(cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi1 phi2))))
(cos.f64 (*.f64 -1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1))))
(cos.f64 (*.f64 -1/2 (-.f64 (PI.f64) (+.f64 phi1 phi2))))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))
(cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))

localize244.0ms (0.2%)

Local error

Found 4 expressions with local error:

NewErrorProgram
0.4b
(pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2)
0.6b
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))
2.7b
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
3.0b
(sin.f64 (/.f64 (-.f64 phi1 phi2) 2))
Compiler

Compiled 595 to 368 computations (38.2% saved)

series23.0ms (0%)

Counts
1 → 48
Calls

12 calls:

TimeVariablePointExpression
11.0ms
phi1
@-inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))
2.0ms
phi1
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))
1.0ms
lambda2
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))
1.0ms
phi2
@inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))
1.0ms
lambda1
@-inf
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))

rewrite61.0ms (0%)

Algorithm
batch-egg-rewrite
Rules
1304×rational_best-1
1300×rational_best-4
1300×rational_best-2
1300×rational_best-3
1300×exponential-1
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
033129
1229129
2479129
31149129
43077129
Stop Event
node limit
Counts
1 → 12
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))
Outputs
((#(struct:change #<rule egg-rr> (2) ((x +.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 0)))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 0 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))))) (#(struct:change #<rule egg-rr> (2) ((x +.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 1 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1) -1)))) (#(struct:change #<rule egg-rr> (2) ((x *.f64 -1 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1))))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x /.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1) -1)))) (#(struct:change #<rule egg-rr> (2) ((x pow.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)))) (#(struct:change #<rule egg-rr> (2) ((x neg.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1))))))

simplify166.0ms (0.1%)

Algorithm
egg-herbie
Rules
1192×rational_best-simplify-1
1160×rational_best-simplify-48
926×rational_best-simplify-54
828×rational_best-simplify-52
700×rational_best-simplify-2
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
02058690
14758554
210168512
319438402
427008356
546658356
Stop Event
node limit
Counts
60 → 106
Calls
Call 1
Inputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))) (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) 1) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 3) (+.f64 (*.f64 -1/48 (sin.f64 (*.f64 -1/2 lambda2))) (*.f64 -1/16 (sin.f64 (*.f64 -1/2 lambda2))))))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 -1/48 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 1 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 0)
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(*.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1) -1)
(*.f64 -1 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(/.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1) -1)
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(neg.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1))
Outputs
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) 1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (neg.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2))))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 -1/8 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 -1/24 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 -1/2 phi2))))) (pow.f64 phi1 3))) (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2)) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) phi1))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2)))))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/8 (sin.f64 (*.f64 -1/2 phi2)))) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 -1/24 (sin.f64 (*.f64 -1/2 phi2))))) (*.f64 -1 (pow.f64 phi1 3)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 -1 (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) -1/6) (pow.f64 phi1 3)) (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 -1 (+.f64 (*.f64 (pow.f64 phi1 2) (+.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) -1/4) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 phi2)) 2))))) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (+.f64 phi1 (*.f64 (pow.f64 phi1 3) -1/6)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 -1/2 (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 -1/2 (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 -1 (*.f64 (+.f64 (*.f64 1/8 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1)))) (*.f64 1/24 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3))) (+.f64 1 (+.f64 (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))
(-.f64 (+.f64 (+.f64 1 (+.f64 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1)))) (*.f64 -1 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (*.f64 -1 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/24 (sin.f64 (*.f64 1/2 phi1))))) (pow.f64 phi2 3)))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (neg.f64 (*.f64 (pow.f64 phi2 2) (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (neg.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) 1/6) (pow.f64 phi2 3)))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1)))) (+.f64 1 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))))) (*.f64 (pow.f64 phi2 3) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) -1/6))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 -1/2 (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 (+.f64 (*.f64 (pow.f64 phi2 2) (neg.f64 (+.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 -1/2 (cos.f64 phi1)))) (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 phi1)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))))) (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 1/2 phi1))) (+.f64 phi2 (*.f64 (neg.f64 (pow.f64 phi2 3)) 1/6))))) (+.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))) (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2)))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) 1) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1)))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 phi2))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda1 (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 -1/2 lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 -1/2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 lambda1 (cos.f64 phi1)))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (+.f64 1 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (+.f64 (*.f64 -1/2 (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 phi2)))) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2)))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2)))) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2)))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))) (*.f64 -1/2 (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2)))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) lambda1)))) (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 2))))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 3) (+.f64 (*.f64 -1/48 (sin.f64 (*.f64 -1/2 lambda2))) (*.f64 -1/16 (sin.f64 (*.f64 -1/2 lambda2))))))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2))
(-.f64 (+.f64 (*.f64 -1/2 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 lambda1 (cos.f64 phi1))))) (+.f64 1 (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))) (*.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 3) (+.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) -1/48) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) -1/16))))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (+.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))))) (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) -1/12) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3)))))) (*.f64 -1/2 (*.f64 (*.f64 lambda1 (cos.f64 phi1)) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 phi2)))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) -1/12) (*.f64 (cos.f64 phi1) (pow.f64 lambda1 3))))) (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))) (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2))))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 -1/2 (*.f64 (cos.f64 phi1) (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2))))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2))) (neg.f64 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (pow.f64 lambda1 3) -1/12)))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 -1/4 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) (pow.f64 lambda1 2)))) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (pow.f64 lambda1 3) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) 1/12)) (*.f64 -1/2 (*.f64 lambda1 (sin.f64 (*.f64 -1/2 lambda2))))))))) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 (*.f64 -1 lambda1) lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (*.f64 lambda1 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 -1/2 (+.f64 lambda2 (neg.f64 lambda1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/2 lambda2))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (*.f64 1/2 (*.f64 lambda2 (cos.f64 phi1)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 1/8 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))) 1)) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 1/8 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (cos.f64 phi1))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (*.f64 1/2 (*.f64 lambda2 (cos.f64 phi1))))) (*.f64 (cos.f64 phi2) (*.f64 1/8 (*.f64 (cos.f64 phi1) (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) lambda2) 2)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/8 (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) lambda2) 2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 phi1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 1/8 (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) lambda2) 2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 1/2 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 lambda2 (cos.f64 phi1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (*.f64 -1/48 (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 1 (+.f64 (*.f64 1/8 (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))) (*.f64 1/2 (*.f64 lambda2 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 phi2) (*.f64 lambda2 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))))) (+.f64 (*.f64 1/8 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))) 1)) (*.f64 -1/48 (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1)))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))) (*.f64 1/2 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 1/8 (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (pow.f64 lambda2 2) (cos.f64 phi1)))))) (*.f64 -1/48 (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda2 3) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 (+.f64 1 (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (*.f64 1/2 (*.f64 lambda2 (cos.f64 phi1)))))) (+.f64 (*.f64 (cos.f64 phi2) (*.f64 1/8 (*.f64 (cos.f64 phi1) (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) lambda2) 2)))) (*.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (*.f64 -1/48 (*.f64 (cos.f64 phi1) (pow.f64 lambda2 3))))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 1/8 (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) lambda2) 2)))) (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))))) (+.f64 (*.f64 1/2 lambda2) (*.f64 -1/48 (pow.f64 lambda2 3)))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)))))
(-.f64 (+.f64 1 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 1/8 (pow.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) lambda2) 2)))) (*.f64 (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))) (+.f64 (*.f64 -1/48 (pow.f64 lambda2 3)) (*.f64 1/2 lambda2))))) (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1)))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (+.f64 (*.f64 -1 lambda2) lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (*.f64 lambda2 -1)))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (+.f64 lambda1 (neg.f64 lambda2)))))))))
(+.f64 1 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 0)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 0 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(+.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 1 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1) -1)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(*.f64 -1 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(/.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1) -1)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(pow.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1))))))) 1)
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))
(neg.f64 (+.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 1/2 lambda1)))))) -1))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi1) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1)))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (cos.f64 phi1))))))
(-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))))

eval4.9s (3.3%)

Compiler

Compiled 195996 to 127425 computations (35% saved)

prune3.3s (2.2%)

Pruning

248 alts after pruning (248 fresh and 0 done)

PrunedKeptTotal
New22391022341
Fresh54146200
Picked101
Done404
Total22982482546
Error
11.5b
Counts
2546 → 248
Alt Table
Click to see full alt table
StatusErrorProgram
46.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
47.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
44.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
49.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
34.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
36.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
49.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
39.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
38.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
43.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
26.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
35.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
25.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
25.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
35.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
36.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
34.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
35.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
44.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
45.1b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.4b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
47.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
46.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
49.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
47.5b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
32.8b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
47.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
44.3b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
38.0b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
47.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
43.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
51.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
37.9b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
50.7b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
46.6b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
48.2b
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
55.6b
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
39.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
51.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
48.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
45.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
30.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
25.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (sin.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
41.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
43.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
39.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
35.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
36.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
26.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
28.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
27.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
27.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
24.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
27.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
27.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
23.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
33.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
37.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
13.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))) 1/2)))) -1)))))))
37.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))) 1/2)))) -1)))))))
37.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))) 1/2)))) -1)))))))
13.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)) 1/2)))) -1)))))))
13.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))) 1/2)))) -1)))))))
13.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))) 1/2)))) -1)))))))
13.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 1/2)))) -1)))))))
37.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))) 1/2)))) -1)))))))
27.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 1/2)))) -1)))))))
28.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 1/2)))) -1)))))))
23.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
31.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))))))))
33.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
38.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
13.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))))
29.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 lambda2 -1/2)) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))))
28.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
14.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
26.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
26.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
39.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
44.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
31.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
25.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
41.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
42.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
42.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
35.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
42.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
38.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
33.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
43.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
45.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
50.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
39.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
48.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
49.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
53.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
51.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
25.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
34.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
25.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
33.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
42.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
31.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
42.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
33.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
31.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
25.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
34.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
45.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
32.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
34.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
34.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
41.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 lambda1 -8))) (*.f64 (sin.f64 (+.f64 (*.f64 4 lambda1) (/.f64 (PI.f64) 2))) (sin.f64 (*.f64 lambda1 -8))))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
42.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (/.f64 (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2))) (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2)) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
42.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
41.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
38.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
42.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
46.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
34.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
34.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
25.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
42.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
46.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
38.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
46.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
38.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
38.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
38.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
44.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
36.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
41.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
47.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
46.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
40.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
37.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
49.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
49.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
49.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
42.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
47.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
41.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
49.4b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
49.9b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
49.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
42.1b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
44.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
49.5b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
47.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
41.7b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
41.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
50.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
47.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
47.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
52.0b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
46.6b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
48.3b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
38.8b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
53.2b
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
56.5b
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
Compiler

Compiled 18626 to 14009 computations (24.8% saved)

regimes5.3s (3.5%)

Counts
369 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 lambda1 -8))) (*.f64 (sin.f64 (+.f64 (*.f64 4 lambda1) (/.f64 (PI.f64) 2))) (sin.f64 (*.f64 lambda1 -8))))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2))) (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2)) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (sin.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (*.f64 (cos.f64 (*.f64 1/2 lambda1)) (neg.f64 lambda2)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 (sin.f64 lambda1) (*.f64 lambda2 -1/2)) (+.f64 (*.f64 1/4 (*.f64 (cos.f64 lambda1) (pow.f64 lambda2 2))) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) (+.f64 (*.f64 (pow.f64 phi2 2) (*.f64 -1/8 (sin.f64 (*.f64 1/2 phi1)))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 1/48 (pow.f64 phi2 3))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 1/2) (/.f64 (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 (*.f64 lambda1 3))) (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3))))) 2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (+.f64 (*.f64 (+.f64 (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 -1/2 lambda2)) 2)) (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))) (pow.f64 lambda1 2)) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (cos.f64 (*.f64 -1/2 lambda2)))))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 1/2)))) -1)))))))
Calls

12 calls:

551.0ms
(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
499.0ms
lambda1
418.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
397.0ms
(/.f64 (-.f64 lambda1 lambda2) 2)
392.0ms
phi2
Results
ErrorSegmentsBranch
13.1b1R
13.1b1lambda1
13.1b1lambda2
13.1b1phi1
13.1b1phi2
13.1b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
13.1b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
13.1b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
13.1b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
13.1b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
13.1b1(/.f64 (-.f64 lambda1 lambda2) 2)
13.1b1(-.f64 lambda1 lambda2)
Compiler

Compiled 26488 to 16857 computations (36.4% saved)

regimes4.7s (3.2%)

Counts
354 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (-.f64 (*.f64 (sin.f64 (*.f64 lambda1 -4)) (cos.f64 (*.f64 lambda1 -8))) (*.f64 (sin.f64 (+.f64 (*.f64 4 lambda1) (/.f64 (PI.f64) 2))) (sin.f64 (*.f64 lambda1 -8))))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (-.f64 (/.f64 (+.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (+.f64 lambda2 (*.f64 lambda1 -3)))) 2) (*.f64 (sin.f64 (*.f64 lambda1 3)) (sin.f64 lambda2))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 2 (sin.f64 (*.f64 1/2 (+.f64 phi1 phi2)))) (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 phi2))) (sin.f64 (neg.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (neg.f64 (+.f64 phi1 phi2))) (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (cos.f64 phi2) (cos.f64 phi1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (cos.f64 (PI.f64))) (*.f64 (sin.f64 (*.f64 (+.f64 (PI.f64) (-.f64 phi1 phi2)) -1/2)) (sin.f64 (PI.f64))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (sin.f64 (+.f64 phi2 phi1)) (cos.f64 (-.f64 (PI.f64) (*.f64 (+.f64 phi2 phi1) -1/2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (+.f64 -1 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 1/2 (*.f64 (sin.f64 (neg.f64 lambda2)) lambda1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 lambda2))))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (+.f64 (*.f64 (sin.f64 (+.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2))) (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 (*.f64 lambda1 3)) -2)) (neg.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3)))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (sin.f64 (neg.f64 (+.f64 phi1 phi2))) (cos.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2)))))) (*.f64 (sin.f64 (+.f64 phi2 (+.f64 phi1 (*.f64 1/2 (PI.f64))))) (sin.f64 (neg.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2) (+.f64 (*.f64 (pow.f64 lambda2 2) (+.f64 (*.f64 -1/4 (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2)) (*.f64 1/4 (pow.f64 (cos.f64 (*.f64 1/2 lambda1)) 2)))) (*.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 1/2 lambda1))) (neg.f64 lambda2)))))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (neg.f64 (+.f64 lambda2 (neg.f64 lambda1)))))) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 -1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))))
Calls

12 calls:

432.0ms
(-.f64 lambda1 lambda2)
424.0ms
R
381.0ms
phi1
363.0ms
(/.f64 (-.f64 lambda1 lambda2) 2)
349.0ms
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
Results
ErrorSegmentsBranch
13.5b1R
13.5b1lambda1
13.5b1lambda2
13.5b1phi1
13.5b1phi2
13.5b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
13.5b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
13.5b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
13.5b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
13.5b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
13.5b1(/.f64 (-.f64 lambda1 lambda2) 2)
13.5b1(-.f64 lambda1 lambda2)
Compiler

Compiled 24911 to 15802 computations (36.6% saved)

regimes5.0s (3.3%)

Counts
327 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 lambda1 3)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
Calls

12 calls:

546.0ms
lambda1
461.0ms
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
427.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
421.0ms
lambda2
345.0ms
(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
Results
ErrorSegmentsBranch
13.5b1R
13.5b1lambda1
13.5b1lambda2
13.5b1phi1
13.5b1phi2
13.5b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
13.5b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
13.5b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
13.5b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
13.5b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
13.5b1(/.f64 (-.f64 lambda1 lambda2) 2)
13.5b1(-.f64 lambda1 lambda2)
Compiler

Compiled 22419 to 14132 computations (37% saved)

regimes5.8s (3.9%)

Counts
324 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))))))
Calls

12 calls:

666.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
494.0ms
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
466.0ms
(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
447.0ms
lambda2
440.0ms
phi2
Results
ErrorSegmentsBranch
13.5b1R
13.5b1lambda1
13.5b1lambda2
13.5b1phi1
13.5b1phi2
13.5b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
13.5b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
13.5b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
13.5b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
13.5b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
13.5b1(/.f64 (-.f64 lambda1 lambda2) 2)
13.5b1(-.f64 lambda1 lambda2)
Compiler

Compiled 22155 to 13957 computations (37% saved)

regimes3.4s (2.3%)

Counts
322 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Calls

12 calls:

227.0ms
(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
227.0ms
lambda1
226.0ms
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
226.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
223.0ms
(/.f64 (-.f64 lambda1 lambda2) 2)
Results
ErrorSegmentsBranch
14.1b1R
14.1b1lambda1
14.1b1lambda2
14.1b1phi1
14.1b1phi2
14.1b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
14.1b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
14.1b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
14.1b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
14.1b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
14.1b1(/.f64 (-.f64 lambda1 lambda2) 2)
14.1b1(-.f64 lambda1 lambda2)
Compiler

Compiled 21982 to 13845 computations (37% saved)

regimes9.2s (6.1%)

Counts
321 → 3
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) 1))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
Calls

12 calls:

950.0ms
R
793.0ms
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
793.0ms
(-.f64 lambda1 lambda2)
785.0ms
(/.f64 (-.f64 lambda1 lambda2) 2)
782.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
Results
ErrorSegmentsBranch
21.3b4R
13.9b3lambda1
13.8b3lambda2
18.2b3phi1
19.3b3phi2
20.7b4(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
20.6b3(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
20.6b3(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
21.0b3(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
20.3b3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
20.6b3(/.f64 (-.f64 lambda1 lambda2) 2)
20.6b3(-.f64 lambda1 lambda2)
Compiler

Compiled 21896 to 13788 computations (37% saved)

bsearch511.0ms (0.3%)

Algorithm
binary-search
Steps
TimeLeftRight
296.0ms
63644402148668.58
1.0775097081350366e+24
203.0ms
-2.2385323080286486e-5
-7.178616154862905e-7
Results
382.0ms178×body1024valid
63.0ms49×body512valid
25.0ms43×body256valid
11.0msbody2048valid
2.0msbody1024infinite
Compiler

Compiled 3172 to 2433 computations (23.3% saved)

regimes11.0s (7.4%)

Counts
319 → 3
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
Calls

12 calls:

1.9s
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
957.0ms
lambda1
941.0ms
phi1
908.0ms
lambda2
893.0ms
R
Results
ErrorSegmentsBranch
23.1b3R
17.1b3lambda1
20.1b3lambda2
19.1b3phi1
20.0b3phi2
21.3b4(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
22.0b2(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
22.0b2(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
22.5b2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
20.5b3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
20.6b3(/.f64 (-.f64 lambda1 lambda2) 2)
20.6b3(-.f64 lambda1 lambda2)
Compiler

Compiled 21726 to 13670 computations (37.1% saved)

bsearch475.0ms (0.3%)

Algorithm
binary-search
Steps
TimeLeftRight
268.0ms
3.8692278015067576e-16
0.004435785269594857
197.0ms
-2454543733890567.5
-17491076118201.264
Results
335.0ms160×body1024valid
73.0ms61×body512valid
27.0ms45×body256valid
19.0msbody2048valid
Compiler

Compiled 2934 to 2229 computations (24% saved)

regimes10.6s (7%)

Counts
318 → 3
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2) (cos.f64 phi1)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
Calls

12 calls:

1.6s
lambda1
1.3s
phi2
1.2s
(/.f64 (-.f64 lambda1 lambda2) 2)
1.0s
(-.f64 lambda1 lambda2)
962.0ms
lambda2
Results
ErrorSegmentsBranch
24.3b1R
22.1b3lambda1
23.1b3lambda2
20.4b3phi1
20.0b3phi2
24.3b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
23.3b2(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
23.3b2(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
23.2b2(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
20.5b3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
20.6b3(/.f64 (-.f64 lambda1 lambda2) 2)
20.6b3(-.f64 lambda1 lambda2)
Compiler

Compiled 21641 to 13611 computations (37.1% saved)

bsearch459.0ms (0.3%)

Algorithm
binary-search
Steps
TimeLeftRight
110.0ms
3.371407854333344e-6
4.0356004129071555e-6
341.0ms
-6.490839086894231e-5
-7.126703191785353e-10
Results
342.0ms115×body1024valid
49.0ms44×body512valid
33.0ms29×body256valid
12.0msbody2048valid
Compiler

Compiled 2202 to 1673 computations (24% saved)

regimes9.6s (6.4%)

Counts
315 → 3
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
Calls

12 calls:

2.0s
(-.f64 lambda1 lambda2)
1.9s
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
1.1s
phi2
942.0ms
lambda2
736.0ms
(/.f64 (-.f64 lambda1 lambda2) 2)
Results
ErrorSegmentsBranch
24.3b1R
22.1b3lambda1
23.1b3lambda2
24.3b1phi1
20.6b3phi2
24.3b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.3b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
24.3b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
24.3b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
20.5b3(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
20.6b3(/.f64 (-.f64 lambda1 lambda2) 2)
20.6b3(-.f64 lambda1 lambda2)
Compiler

Compiled 21392 to 13437 computations (37.2% saved)

bsearch9.0ms (0%)

Algorithm
left-value
Steps
TimeLeftRight
0.0ms
7.454198578783046e-12
1.1192661539909548e-5
0.0ms
-0.07557113153934225
-0.0061254468372054
Compiler

Compiled 63 to 42 computations (33.3% saved)

regimes3.5s (2.3%)

Counts
314 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1)))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 (+.f64 (*.f64 1/2 (PI.f64)) (*.f64 (+.f64 phi1 phi2) 3/2)) (neg.f64 (+.f64 (PI.f64) (+.f64 phi1 phi2))))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (cos.f64 (*.f64 (+.f64 phi2 (+.f64 phi1 (PI.f64))) -1/2)) (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1)))) -2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (-.f64 phi1 phi2) (PI.f64)))) (sin.f64 (-.f64 phi2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64))))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (*.f64 phi1 (sin.f64 (*.f64 -1/2 phi2)))))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))) (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1))) (+.f64 -1 (*.f64 phi2 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 (cos.f64 (*.f64 1/2 phi1))))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (cos.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (sin.f64 (-.f64 (/.f64 (PI.f64) 2) (+.f64 lambda2 (*.f64 lambda1 3)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (sin.f64 (-.f64 phi2 phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) -1/2)) (cos.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1)))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (sin.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 -1/2 phi2))) (neg.f64 phi1))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (+.f64 (cos.f64 (*.f64 phi2 1/2)) (cos.f64 (*.f64 phi2 1/2)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1)))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (+.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64))) (-.f64 (*.f64 phi2 1/2) phi1))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Calls

12 calls:

406.0ms
(/.f64 (-.f64 lambda1 lambda2) 2)
336.0ms
lambda2
315.0ms
phi2
299.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
271.0ms
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
Results
ErrorSegmentsBranch
24.3b1R
24.3b1lambda1
24.3b1lambda2
24.3b1phi1
24.3b1phi2
24.3b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.3b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
24.3b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
24.3b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
24.3b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
24.3b1(/.f64 (-.f64 lambda1 lambda2) 2)
24.3b1(-.f64 lambda1 lambda2)
Compiler

Compiled 21309 to 13379 computations (37.2% saved)

regimes3.0s (2%)

Counts
267 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64))) (cos.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 1/2 (PI.f64)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (neg.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 lambda2 lambda1) -1/2)) (cos.f64 (*.f64 1/2 (-.f64 (-.f64 lambda1 (PI.f64)) lambda2)))) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 1/2 phi2)) (*.f64 phi1 (*.f64 -1/2 (sin.f64 (*.f64 1/2 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda1 3)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4))))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2)) (+.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (cos.f64 (/.f64 (-.f64 phi1 (-.f64 (PI.f64) phi2)) 2))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))) (*.f64 3 (sin.f64 (*.f64 -1/2 (+.f64 phi1 phi2))))) 2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (-.f64 lambda2 lambda1)) (cos.f64 (/.f64 (PI.f64) -2))) (*.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 (*.f64 1/2 (PI.f64))))) (sin.f64 (/.f64 (PI.f64) -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (cos.f64 phi2) (*.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (cos.f64 phi1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (cos.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2)))) (*.f64 (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))) (sin.f64 (+.f64 (+.f64 lambda1 lambda1) (/.f64 (PI.f64) -2))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (cos.f64 (*.f64 lambda2 1/2))) (*.f64 (sin.f64 (*.f64 lambda2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) lambda1))))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 phi1 1/2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) 1/2)) (cos.f64 (neg.f64 (PI.f64)))) (*.f64 (cos.f64 (*.f64 (+.f64 phi2 (neg.f64 phi1)) -1/2)) (sin.f64 (neg.f64 (PI.f64))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
Calls

12 calls:

462.0ms
phi2
299.0ms
phi1
298.0ms
(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
251.0ms
R
201.0ms
lambda1
Results
ErrorSegmentsBranch
24.5b1R
24.5b1lambda1
24.5b1lambda2
24.5b1phi1
24.5b1phi2
24.5b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
24.5b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
24.5b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
24.5b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
24.5b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
24.5b1(/.f64 (-.f64 lambda1 lambda2) 2)
24.5b1(-.f64 lambda1 lambda2)
Compiler

Compiled 17477 to 10971 computations (37.2% saved)

regimes2.0s (1.3%)

Counts
210 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 (neg.f64 phi1)))) (cos.f64 (-.f64 (*.f64 1/2 (+.f64 (-.f64 (PI.f64) phi1) phi2)) (PI.f64)))) -2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 4))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) (/.f64 (-.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64))))) (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 -1/8 (*.f64 (pow.f64 phi1 2) (sin.f64 (*.f64 -1/2 phi2)))) (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 -1/8 (pow.f64 phi2 2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (fabs.f64 (-.f64 (*.f64 1/2 (+.f64 (cos.f64 0) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)) (sin.f64 (*.f64 -1/2 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (cos.f64 (-.f64 (*.f64 phi2 1/2) phi1))) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi1 (PI.f64)))) (sin.f64 (-.f64 (*.f64 phi2 1/2) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 -1/2)) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2)))) (*.f64 (sin.f64 (*.f64 phi1 -1/2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 phi2 -1/2))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (/.f64 (+.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1) (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))) 2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (+.f64 (PI.f64) (+.f64 phi1 phi2)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) (+.f64 phi2 phi1)))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 (PI.f64) (*.f64 -1/2 (+.f64 phi1 phi2))))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4)))) (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (*.f64 lambda1 4))))))) (cos.f64 phi2))))))))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
Calls

12 calls:

236.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
116.0ms
(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
115.0ms
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
113.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
112.0ms
phi2
Results
ErrorSegmentsBranch
25.1b1R
25.1b1lambda1
25.1b1lambda2
25.1b1phi1
25.1b1phi2
25.1b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.1b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
25.1b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
25.1b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
25.1b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
25.1b1(/.f64 (-.f64 lambda1 lambda2) 2)
25.1b1(-.f64 lambda1 lambda2)
Compiler

Compiled 13215 to 8262 computations (37.5% saved)

regimes2.0s (1.3%)

Counts
179 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 phi2 (cos.f64 (*.f64 1/2 phi1))))) (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 (+.f64 1 (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (neg.f64 phi1)))) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (sin.f64 (*.f64 1/2 phi1)) (*.f64 (cos.f64 (*.f64 1/2 phi1)) (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 3) (*.f64 (sin.f64 (*.f64 -1/2 (neg.f64 (+.f64 phi2 (neg.f64 phi1))))) 4)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) (/.f64 (cos.f64 (neg.f64 lambda2)) 2))) (*.f64 1/2 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 -1/2 (-.f64 (cos.f64 0) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (*.f64 1/2 lambda1)))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (cos.f64 (*.f64 lambda1 -4))) (*.f64 (sin.f64 (+.f64 lambda2 (*.f64 lambda1 3))) (sin.f64 (*.f64 lambda1 -4)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda1 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda1 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 lambda2 -2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 lambda2 -2)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (*.f64 2 (neg.f64 lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (*.f64 2 (neg.f64 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (+.f64 (+.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -2)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (sin.f64 (+.f64 (PI.f64) (*.f64 (-.f64 phi1 phi2) -1/2)))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (cos.f64 (+.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 1/2 (+.f64 (PI.f64) (-.f64 phi1 phi2))) (+.f64 phi1 phi1))))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (/.f64 (+.f64 (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 4) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3))) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 phi1 phi2))) 3)) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (neg.f64 lambda2)) (sin.f64 (neg.f64 lambda1))) (*.f64 (cos.f64 (neg.f64 lambda1)) (sin.f64 (+.f64 lambda2 (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) lambda1)))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2))) (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 2 (cos.f64 (-.f64 lambda1 lambda2))))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 (neg.f64 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 (neg.f64 lambda2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (cos.f64 (*.f64 1/2 (+.f64 lambda2 (-.f64 (PI.f64) lambda1)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi1)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 phi2)) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi1)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 phi2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 1/2 phi1)) (cos.f64 (*.f64 phi2 1/2))) (*.f64 (sin.f64 (*.f64 phi2 1/2)) (sin.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (*.f64 lambda2 -2)) (sin.f64 (-.f64 (neg.f64 lambda2) lambda1))) (*.f64 (cos.f64 (-.f64 (neg.f64 lambda2) lambda1)) (sin.f64 (+.f64 (+.f64 lambda2 lambda2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (+.f64 (*.f64 (+.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) -1/2)) (cos.f64 phi1)) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi1 1/2)) (cos.f64 (*.f64 phi2 -1/2))) (*.f64 (sin.f64 (*.f64 phi2 -1/2)) (cos.f64 (*.f64 phi1 1/2)))) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (neg.f64 (-.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1))) 1))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 phi1)) (*.f64 (sin.f64 (*.f64 1/2 (+.f64 phi2 phi1))) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 (*.f64 lambda1 -2) (*.f64 1/2 (PI.f64)))))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda2))) (*.f64 (cos.f64 (+.f64 lambda2 lambda2)) (sin.f64 (-.f64 (*.f64 1/2 (PI.f64)) (+.f64 lambda2 lambda1))))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 -1/2 (*.f64 lambda2 (cos.f64 (*.f64 1/2 lambda1)))) (sin.f64 (*.f64 1/2 lambda1)))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
Calls

12 calls:

389.0ms
phi2
275.0ms
R
195.0ms
lambda2
147.0ms
lambda1
90.0ms
(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
Results
ErrorSegmentsBranch
25.1b1R
25.1b1lambda1
25.1b1lambda2
25.1b1phi1
25.1b1phi2
25.1b1(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))))
25.1b1(*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))))))
25.1b1(atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))))
25.1b1(+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))
25.1b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
25.1b1(/.f64 (-.f64 lambda1 lambda2) 2)
25.1b1(-.f64 lambda1 lambda2)
Compiler

Compiled 11003 to 6859 computations (37.7% saved)

regimes934.0ms (0.6%)

Counts
85 → 1
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2))))) (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) -1))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (*.f64 lambda1 (*.f64 -1/2 lambda2)) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi2) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 (-.f64 lambda1 lambda2))) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 1 (cos.f64 lambda1)) 2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 (*.f64 1/2 lambda1))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 (*.f64 1/2 lambda1)) (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2)))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))) (sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))))) (sqrt.f64 (-.f64 1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) (sin.f64 (*.f64 1/2 phi1))) (*.f64 (sin.f64 (*.f64 -1/2 phi2)) (cos.f64 (*.f64 1/2 phi1)))) 2))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (/.f64 (+.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) (cos.f64 (*.f64 1/2 (-.f64 phi1 (+.f64 phi2 (PI.f64)))))) 2) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 (PI.f64) phi2))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (-.f64 (PI.f64) phi1))) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
Outputs
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 (-.f64 phi1 phi2) 1/2)) 2) (+.f64 (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) 1/2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) -1)))))))
Calls

8 calls:

213.0ms
R
91.0ms
lambda2
39.0ms
lambda1
38.0ms
(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
38.0ms
phi2
Results
ErrorSegmentsBranch
25.6b1R
25.6b1lambda1
25.6b1lambda2
25.6b1phi1
25.6b1phi2
25.6b1(sin.f64 (/.f64 (-.f64 lambda1 lambda2) 2))
25.6b1(/.f64 (-.f64 lambda1 lambda2) 2)
25.6b1(-.f64 lambda1 lambda2)
Compiler

Compiled 4616 to 2965 computations (35.8% saved)

regimes580.0ms (0.4%)

Counts
55 → 3
Calls
Call 1
Inputs
(*.f64 R (*.f64 2 (atan2.f64 (sin.f64 (*.f64 -1/2 phi2)) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (*.f64 (cos.f64 phi1) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1))) (cos.f64 phi2)))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (+.f64 (sin.f64 (*.f64 -1/2 phi2)) (*.f64 (cos.f64 phi1) (*.f64 (pow.f64 lambda1 2) (*.f64 (cos.f64 phi2) (/.f64 1/8 (sin.f64 (*.f64 -1/2 phi2))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 1/4 (pow.f64 lambda1 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 (cos.f64 (neg.f64 lambda2)) 1/2)) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 lambda1) (*.f64 lambda1 -2))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (+.f64 lambda2 (+.f64 lambda1 (*.f64 lambda2 -2)))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 lambda1 (*.f64 -1/2 lambda2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (+.f64 (+.f64 lambda2 (*.f64 lambda1 3)) (*.f64 lambda1 -4))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 lambda2)) 2) (*.f64 (sin.f64 (*.f64 -1/2 lambda2)) (*.f64 (cos.f64 (*.f64 -1/2 lambda2)) lambda1)))))) (sqrt.f64 (-.f64 1 (pow.f64 (sin.f64 (*.f64 1/2 (-.f64 lambda1 lambda2))) 2))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) -1/2)) (neg.f64 (cos.f64 lambda1))))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (+.f64 (-.f64 1/2 (*.f64 (cos.f64 lambda1) 2)) (*.f64 (cos.f64 lambda1) 3/2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 1/2 (+.f64 phi2 (-.f64 (PI.f64) phi1)))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (+.f64 (*.f64 lambda2 (sin.f64 lambda1)) (cos.f64 lambda1)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2))))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (+.f64 (*.f64 1/2 (*.f64 (cos.f64 (*.f64 -1/2 phi2)) phi1)) (sin.f64 (*.f64 -1/2 phi2))) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 -1/2 (*.f64 lambda2 (sin.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (*.f64 1/2 (cos.f64 lambda1)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (sin.f64 (+.f64 lambda2 (-.f64 (*.f64 1/2 (PI.f64)) lambda1))))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (+.f64 (cos.f64 (neg.f64 lambda2)) (*.f64 (sin.f64 (neg.f64 lambda2)) (neg.f64 lambda1))) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi2))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (neg.f64 lambda2)) 2))))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 lambda1) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (-.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 2) (*.f64 (neg.f64 (cos.f64 (-.f64 lambda1 lambda2))) 3)))) (cos.f64 phi2))))))))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))) (*.f64 R 2))
Outputs
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
(*.f64 R (*.f64 2 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2)))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 -1/2 phi2)) 2) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 phi2) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))))))))
(*.f64 (atan2.f64 (sqrt.f64 (+.f64 (pow.f64 (sin.f64 (/.f64 (-.f64 phi1 phi2) 2)) 2) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (-.f64 1/2 (/.f64 (cos.f64 (*.f64 (-.f64 lambda1 lambda2) 1)) 2))))) (sqrt.f64 (-.f64 1 (+.f64 (pow.f64 (sin.f64 (*.f64 1/2 phi1)) 2) (*.f64 (-.f64 1/2 (*.f64 1/2 (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 phi1)))))) (*.f64 R 2))
Calls

6 calls:

144.0ms
lambda1
100.0ms
R
71.0ms
lambda2
69.0ms
phi1
68.0ms
phi2
Results
ErrorSegmentsBranch
32.0b1R
25.6b3lambda1
25.6b3lambda2
25.2b3phi1
25.3b3phi2
30.9b2(-.f64 lambda1 lambda2)
Compiler

Compiled 2849 to 1889 computations (33.7% saved)

bsearch1.5s (1%)

Algorithm
binary-search
Steps
TimeLeftRight
859.0ms
4.375311926183612e-5
0.07051085531680723
600.0ms
-2.3997598535046388e-6
-8.56160058055762e-10
Results
751.0ms163×body1024valid
645.0ms50×body512valid
41.0ms13×body2048valid
15.0ms30×body256valid
Compiler

Compiled 2014 to 1541 computations (23.5% saved)

regimes1.8s (1.2%)

Calls

5 calls:

655.0ms
lambda2
333.0ms
phi2
185.0ms
phi1
144.0ms
lambda1
128.0ms
(-.f64 lambda1 lambda2)
Results
ErrorSegmentsBranch
25.6b3lambda2
25.2b3phi1
25.3b3phi2
30.9b2(-.f64 lambda1 lambda2)
Results
Compiler

Compiled 2615 to 1738 computations (33.5% saved)

Profiling

Loading profile data...